Mercurial > emacs
comparison lisp/menu-bar.el @ 65127:7adadc9e4a10
(menu-bar-options-menu, menu-bar-options-save):
Delete "Automatic File De/compression" (auto-compression-mode).
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Thu, 25 Aug 2005 19:09:37 +0000 |
| parents | e15876d0c6a1 |
| children | a1ea2d5f0190 2d92f5c9d6ae |
comparison
equal
deleted
inserted
replaced
| 65126:559a37c2f306 | 65127:7adadc9e4a10 |
|---|---|
| 649 (dolist (elt '(scroll-bar-mode | 649 (dolist (elt '(scroll-bar-mode |
| 650 debug-on-quit debug-on-error | 650 debug-on-quit debug-on-error |
| 651 tooltip-mode menu-bar-mode tool-bar-mode | 651 tooltip-mode menu-bar-mode tool-bar-mode |
| 652 save-place uniquify-buffer-name-style fringe-mode | 652 save-place uniquify-buffer-name-style fringe-mode |
| 653 indicate-empty-lines indicate-buffer-boundaries | 653 indicate-empty-lines indicate-buffer-boundaries |
| 654 case-fold-search auto-compression-mode | 654 case-fold-search |
| 655 current-language-environment default-input-method | 655 current-language-environment default-input-method |
| 656 ;; Saving `text-mode-hook' is somewhat questionable, | 656 ;; Saving `text-mode-hook' is somewhat questionable, |
| 657 ;; as we might get more than we bargain for, if | 657 ;; as we might get more than we bargain for, if |
| 658 ;; other code may has added hooks as well. | 658 ;; other code may has added hooks as well. |
| 659 ;; Nonetheless, not saving it would like be confuse | 659 ;; Nonetheless, not saving it would like be confuse |
| 974 (menu-bar-make-mm-toggle blink-cursor-mode | 974 (menu-bar-make-mm-toggle blink-cursor-mode |
| 975 "Blinking Cursor" | 975 "Blinking Cursor" |
| 976 "Whether the cursor blinks (Blink Cursor mode)")) | 976 "Whether the cursor blinks (Blink Cursor mode)")) |
| 977 (define-key menu-bar-options-menu [cursor-separator] | 977 (define-key menu-bar-options-menu [cursor-separator] |
| 978 '("--")) | 978 '("--")) |
| 979 | |
| 980 (define-key menu-bar-options-menu [toggle-auto-compression] | |
| 981 '(menu-item "Automatic File De/compression" | |
| 982 auto-compression-mode | |
| 983 :help "Transparently decompress compressed files" | |
| 984 :button (:toggle . (rassq 'jka-compr-handler | |
| 985 file-name-handler-alist)))) | |
| 986 | 979 |
| 987 (define-key menu-bar-options-menu [save-place] | 980 (define-key menu-bar-options-menu [save-place] |
| 988 (menu-bar-make-toggle toggle-save-place-globally save-place | 981 (menu-bar-make-toggle toggle-save-place-globally save-place |
| 989 "Save Place in Files between Sessions" | 982 "Save Place in Files between Sessions" |
| 990 "Saving place in files %s" | 983 "Saving place in files %s" |