Mercurial > emacs
comparison lisp/bindings.el @ 105996:5bb289ba7169
* bindings.el (mode-line-buffer-identification): Purecopy only the string.
* international/ccl.el (define-ccl-program): Do not purecopy the
docstring, defconst does it anyway.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Sat, 14 Nov 2009 02:01:35 +0000 |
parents | a0f778f4a995 |
children | 42cdafa98c50 |
comparison
equal
deleted
inserted
replaced
105995:d90116e2656a | 105996:5bb289ba7169 |
---|---|
457 mouse-1: previous buffer\n\ | 457 mouse-1: previous buffer\n\ |
458 mouse-3: next buffer") | 458 mouse-3: next buffer") |
459 'mouse-face 'mode-line-highlight | 459 'mouse-face 'mode-line-highlight |
460 'local-map mode-line-buffer-identification-keymap))) | 460 'local-map mode-line-buffer-identification-keymap))) |
461 | 461 |
462 (defvar mode-line-buffer-identification (purecopy (propertized-buffer-identification "%12b")) "\ | 462 (defvar mode-line-buffer-identification (propertized-buffer-identification (purecopy "%12b")) "\ |
463 Mode-line control for identifying the buffer being displayed. | 463 Mode-line control for identifying the buffer being displayed. |
464 Its default value is (\"%12b\") with some text properties added. | 464 Its default value is (\"%12b\") with some text properties added. |
465 Major modes that edit things other than ordinary files may change this | 465 Major modes that edit things other than ordinary files may change this |
466 \(e.g. Info, Dired,...)") | 466 \(e.g. Info, Dired,...)") |
467 | 467 |