summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndreas Schwab <schwab@suse.de>2008-03-23 11:59:46 +0000
committerAndreas Schwab <schwab@suse.de>2008-03-23 11:59:46 +0000
commit1983a336227be0bf01b6a85cfec4e6a33039ff11 (patch)
tree6c2d83247c9d9db04faffcacee2da83b9ed5e24c
parentec27a07c0b8a8de4179c5b561558a78da6ab7fe0 (diff)
downloademacs-1983a336227be0bf01b6a85cfec4e6a33039ff11.tar.gz
(menu-bar-showhide-fringe-ind-menu) [customize]: Add radio button.
-rw-r--r--lisp/ChangeLog1
-rw-r--r--lisp/menu-bar.el6
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 329ecdc2186..2d420370d14 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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 <dann@ics.uci.edu>
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 30a4e42551a..ede3f91221c 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -745,7 +745,11 @@ mail status in mode line"))
'(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."