Mercurial > emacs

changeset 52664:0e2f2cae953c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mode-line-modes): Remove superfluous :propertize construct in initialization. (mode-line-position): Change cons cell into proper list in initialization.
author Lute Kamstra <lute@gnu.org>
date Mon, 29 Sep 2003 10:28:21 +0000
parents 5f70316d2ec5
children c9422c237eae
files lisp/bindings.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/bindings.el	Mon Sep 29 10:19:05 2003 +0000
+++ b/lisp/bindings.el	Mon Sep 29 10:28:21 2003 +0000
@@ -303,7 +303,7 @@
      `(:propertize ("" mode-name)
 		   help-echo "mouse-2: help for current major mode"
 		   local-map ,mode-line-major-mode-keymap)
-     `(:propertize ("" mode-line-process))
+     '("" mode-line-process)
      `(:propertize ("" minor-mode-alist)
 		   help-echo "mouse-2: help for minor modes, mouse-3: minor mode menu"
 		   local-map ,mode-line-minor-mode-keymap)
@@ -313,7 +313,7 @@
      (propertize ")%]--" 'help-echo help-echo)))
 
   (setq-default mode-line-position
-    `((-3 . ,(propertize "%p" 'help-echo help-echo))
+    `((-3 ,(propertize "%p" 'help-echo help-echo))
       (size-indication-mode 
        (8 ,(propertize " of %I" 'help-echo help-echo)))
       (line-number-mode