# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 909001481 0
# Node ID a493aa84f62f09d9fd4f2915e2d2deeaa5536f13
# Parent  37ae25c77df0b864182b45f21c0da5026eb6562c
(menu-bar-options-menu): Add options for truncate-lines and show-paren.

diff -r 37ae25c77df0 -r a493aa84f62f lisp/menu-bar.el
--- a/lisp/menu-bar.el	Wed Oct 21 20:03:07 1998 +0000
+++ b/lisp/menu-bar.el	Wed Oct 21 20:24:41 1998 +0000
@@ -420,6 +420,12 @@
   (menu-bar-make-toggle toggle-case-fold-search case-fold-search
 			"Case folding in searches"
 			"Case folding in searches %s"))
+(define-key menu-bar-options-menu [truncate-lines]
+  (menu-bar-make-toggle
+   toggle-truncate-lines truncate-lines
+   "Line Truncation" "Line Truncation %s"
+   (prog1 (setq truncate-lines (not truncate-lines))
+     (set-buffer-modified-p (buffer-modified-p)))))
 (define-key menu-bar-options-menu [transient-mark-mode]
   (menu-bar-make-toggle toggle-transient-mark-mode transient-mark-mode
 			"Transient Mark Mode (highlights region)"