Merged from miles@gnu.org--gnu-2005 (patch 149-151, 629-641)

[gnu-emacs] / lisp / bindings.el

diff --git a/lisp/bindings.el b/lisp/bindings.el
index dbab5f00f0bba22084f88bba5c48f83363d7414f..49a10bc572370552cca67a468b99648dad5998f3 100644 (file)
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -217,7 +217,7 @@ Major modes that edit things other than ordinary files may change this
 
 (make-variable-buffer-local 'mode-line-buffer-identification)
 
-(defvar mode-line-frame-identification '("-%F  ")
+(defvar mode-line-frame-identification '(window-system "  " "-%F  ")
   "Mode-line control to describe the current frame.")
 
 (defvar mode-line-process nil "\