diff options
| author | Dan Nicolaescu <dann@ics.uci.edu> | 2009-10-30 02:00:11 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <dann@ics.uci.edu> | 2009-10-30 02:00:11 +0000 |
| commit | ca0a881a3512c1f9495833e15a801f5af5b89893 (patch) | |
| tree | 6d91adb6a5117ab394bb0564cca9f95b8e16f9f1 /lisp/bindings.el | |
| parent | d9a57abf8154b57d50371250348628e0102e28a2 (diff) | |
| download | emacs-ca0a881a3512c1f9495833e15a801f5af5b89893.tar.gz | |
* puresize.h (BASE_PURESIZE): Increase to 1470000.
* lread.c (Fload): Purecopy the file name when building Vpreloaded_file_list.
* textmodes/ispell.el (ispell-skip-region-alist):
* international/mule-conf.el (eight-bit):
* international/fontset.el (font-encoding-alist):
* startup.el (pure-space-overflow-message):
* simple.el (overwrite-mode-textual, overwrite-mode-binary):
* paths.el (gnus-nntp-service, rmail-spool-directory)
(term-file-prefix):
* files.el (save-some-buffers-action-alist):
* cmuscheme.el (same-window-buffer-names):
* ielm.el (same-window-buffer-names):
* shell.el (same-window-buffer-names):
* mail/sendmail.el (same-window-buffer-names):
* progmodes/inf-lisp.el (same-window-buffer-names):
* bindings.el (mode-line-client)
(mode-line-column-line-number-mode-map):
* language/tibetan.el (tibetan-precomposition-rule-regexp)
(tibetan-precomposed-regexp): Purecopy string arguments.
Diffstat (limited to 'lisp/bindings.el')
| -rw-r--r-- | lisp/bindings.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index 568d8de5f72..7fdfb3ee5d5 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -151,7 +151,7 @@ corresponding to the mode line clicked." (defvar mode-line-client `("" (:propertize ("" (:eval (if (frame-parameter nil 'client) "@" ""))) - help-echo "emacsclient frame")) + help-echo ,(purecopy "emacsclient frame"))) "Mode-line control for identifying emacsclient frames.") ;;;###autoload (put 'mode-line-client 'risky-local-variable t) @@ -315,11 +315,11 @@ Keymap to display on minor modes.") (menu-map (make-sparse-keymap "Toggle Line and Column Number Display"))) (define-key menu-map [line-number-mode] `(menu-item ,(purecopy "Display Line Numbers") line-number-mode - :help "Toggle displaying line numbers in the mode-line" + :help ,(purecopy "Toggle displaying line numbers in the mode-line") :button (:toggle . line-number-mode))) (define-key menu-map [column-number-mode] `(menu-item ,(purecopy "Display Column Numbers") column-number-mode - :help "Toggle displaying column numbers in the mode-line" + :help ,(purecopy "Toggle displaying column numbers in the mode-line") :button (:toggle . column-number-mode))) (define-key map [mode-line down-mouse-1] menu-map) map) "\ |