(mode-line-modes): Remove superfluous :propertize

construct in initialization.
(mode-line-position): Change cons cell into proper list in
initialization.

diff --git a/lisp/bindings.el b/lisp/bindings.el
index c9357ea7d7d1c51af19f2f6b9268eeb05fd1e5dc..b6e02542a53c64e03d9bb25ad514c9af3eb5f9a9 100644 (file)
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -303,7 +303,7 @@ Keymap to display on minor modes.")
      `(: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 @@ Keymap to display on minor modes.")
      (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