Mercurial > emacs
comparison lisp/menu-bar.el @ 23532:a493aa84f62f
(menu-bar-options-menu): Add options for truncate-lines and show-paren.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 21 Oct 1998 20:24:41 +0000 |
parents | eef770da40ce |
children | f9ccd26b8627 |
comparison
equal
deleted
inserted
replaced
23531:37ae25c77df0 | 23532:a493aa84f62f |
---|---|
418 'forward)))) | 418 'forward)))) |
419 (define-key menu-bar-options-menu [case-fold-search] | 419 (define-key menu-bar-options-menu [case-fold-search] |
420 (menu-bar-make-toggle toggle-case-fold-search case-fold-search | 420 (menu-bar-make-toggle toggle-case-fold-search case-fold-search |
421 "Case folding in searches" | 421 "Case folding in searches" |
422 "Case folding in searches %s")) | 422 "Case folding in searches %s")) |
423 (define-key menu-bar-options-menu [truncate-lines] | |
424 (menu-bar-make-toggle | |
425 toggle-truncate-lines truncate-lines | |
426 "Line Truncation" "Line Truncation %s" | |
427 (prog1 (setq truncate-lines (not truncate-lines)) | |
428 (set-buffer-modified-p (buffer-modified-p))))) | |
423 (define-key menu-bar-options-menu [transient-mark-mode] | 429 (define-key menu-bar-options-menu [transient-mark-mode] |
424 (menu-bar-make-toggle toggle-transient-mark-mode transient-mark-mode | 430 (menu-bar-make-toggle toggle-transient-mark-mode transient-mark-mode |
425 "Transient Mark Mode (highlights region)" | 431 "Transient Mark Mode (highlights region)" |
426 "Transient Mark mode %s")) | 432 "Transient Mark mode %s")) |
427 (define-key menu-bar-options-menu [toggle-auto-compression] | 433 (define-key menu-bar-options-menu [toggle-auto-compression] |