# HG changeset patch # User Andreas Schwab # Date 1206273586 0 # Node ID 4e64068576f82a8fc9a6a8a12b81d1cb14d7cc75 # Parent 13bd74fbe1c7ef850ff97a0bdbf75f584c5f0885 (menu-bar-showhide-fringe-ind-menu) [customize]: Add radio button. diff -r 13bd74fbe1c7 -r 4e64068576f8 lisp/ChangeLog --- a/lisp/ChangeLog Sun Mar 23 11:39:33 2008 +0000 +++ b/lisp/ChangeLog Sun Mar 23 11:59:46 2008 +0000 @@ -3,6 +3,7 @@ * menu-bar.el (menu-bar-showhide-fringe-ind-menu) [mixed]: Fix radio button condition. [box]: Likewise. + [customize]: Add radio button. 2008-03-20 Dan Nicolaescu diff -r 13bd74fbe1c7 -r 4e64068576f8 lisp/menu-bar.el --- 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."