comparison lisp/replace.el @ 105965:3f64b8380468

* textmodes/ispell.el (ispell-skip-region-alist): * textmodes/css-mode.el (auto-mode-alist): * progmodes/compile.el (auto-mode-alist): * international/mule.el (ctext-non-standard-encodings-alist) (ctext-non-standard-encodings-regexp): * simple.el (shell-command-switch, text-read-only): * replace.el (occur-mode-map): * paths.el (rmail-file-name): * jka-cmpr-hook.el (jka-compr-build-file-regexp): * find-file.el (ff-special-constructs): * files.el (file-name-handler-alist): * composite.el: Purecopy strings.
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 12 Nov 2009 06:55:39 +0000
parents f7147d70f6ef
children d1953939048b
comparison
equal deleted inserted replaced
105964:bedac8edf64d 105965:3f64b8380468
771 `(cons ,(purecopy "Occur") map)) 771 `(cons ,(purecopy "Occur") map))
772 (define-key map [next-error-follow-minor-mode] 772 (define-key map [next-error-follow-minor-mode]
773 (menu-bar-make-mm-toggle next-error-follow-minor-mode 773 (menu-bar-make-mm-toggle next-error-follow-minor-mode
774 "Auto Occurrence Display" 774 "Auto Occurrence Display"
775 "Display another occurrence when moving the cursor")) 775 "Display another occurrence when moving the cursor"))
776 (define-key map [separator-1] '("--")) 776 (define-key map [separator-1] menu-bar-separator)
777 (define-key map [kill-this-buffer] 777 (define-key map [kill-this-buffer]
778 `(menu-item ,(purecopy "Kill occur buffer") kill-this-buffer 778 `(menu-item ,(purecopy "Kill occur buffer") kill-this-buffer
779 :help ,(purecopy "Kill the current *Occur* buffer"))) 779 :help ,(purecopy "Kill the current *Occur* buffer")))
780 (define-key map [quit-window] 780 (define-key map [quit-window]
781 `(menu-item ,(purecopy "Quit occur window") quit-window 781 `(menu-item ,(purecopy "Quit occur window") quit-window