* bindings.el (propertized-buffer-identification): Undo previous change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0adff35..12d6d3a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -17,9 +17,6 @@
        * replace.el (occur-mode-map):
        * pcvs-defs.el (cvs-global-menu): Purecopy names and tooltips.
 
-       * bindings.el (propertized-buffer-identification): Purecopy
-       tooltip text.
-
 2009-10-23  Jay Belanger  <jay.p.belanger@gmail.com>
 
        * calc/calc.el (math-read-number, math-read-number-simple): Use

diff --git a/lisp/bindings.el b/lisp/bindings.el
index c1b0749..4bcd9a7 100644 (file)
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -450,10 +450,10 @@ Keymap for what is displayed by `mode-line-buffer-identification'.")
   "Return a list suitable for `mode-line-buffer-identification'.
 FMT is a format specifier such as \"%12b\".  This function adds
 text properties for face, help-echo, and local-map to it."
-  `(list (propertize fmt
+  (list (propertize fmt
                    'face 'mode-line-buffer-id
                    'help-echo
-                   ,(purecopy "Buffer name\n\
+                   (purecopy "Buffer name\n\
 mouse-1: previous buffer\n\
 mouse-3: next buffer")
                    'mouse-face 'mode-line-highlight