Mercurial > emacs

diff lisp/menu-bar.el @ 80366:4e64068576f8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(menu-bar-showhide-fringe-ind-menu) [customize]: Add radio button.
author Andreas Schwab <schwab@suse.de>
date Sun, 23 Mar 2008 11:59:46 +0000
parents b903b7ebbe29
children
line wrap: on
line diff
--- a/lisp/menu-bar.el	Sun Mar 23 11:39:33 2008 +0000
+++ b/lisp/menu-bar.el	Sun Mar 23 11:59:46 2008 +0000
@@ -745,7 +745,11 @@
   '(menu-item "Other (Customize)"
 	      menu-bar-showhide-fringe-ind-customize
 	      :help "Additional choices available through Custom buffer"
-	      :visible (display-graphic-p)))
+	      :visible (display-graphic-p)
+	      :button (:radio . (not (member indicate-buffer-boundaries
+					     '(nil left right
+					       ((top . left) (bottom . right))
+					       ((t . right) (top . left))))))))
 
 (defun menu-bar-showhide-fringe-ind-mixed ()
   "Display top and bottom indicators in opposite fringes, arrows in right."