# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 1206272663 0
# Node ID 09cc3d0d41cec196241422be3edfe16760b42294
# Parent  3891784e87be00c3f49e8c2ab1973ee309196ecd
(menu-bar-showhide-fringe-ind-menu) [customize]: Add radio button.

diff -r 3891784e87be -r 09cc3d0d41ce lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Mar 23 11:21:14 2008 +0000
+++ b/lisp/ChangeLog	Sun Mar 23 11:44:23 2008 +0000
@@ -1,8 +1,9 @@
 2008-03-23  Andreas Schwab  <schwab@suse.de>
 
-	* menu-bar.el (menu-bar-showhide-fringe-ind-menu): Fix radio
-	button condition.
-	(menu-bar-showhide-fringe-ind-menu): Likewise.
+	* menu-bar.el (menu-bar-showhide-fringe-ind-menu) [mixed]: Fix
+	radio button condition.
+	[box]: Likewise.
+	[customize]: Add radio button.
 
 2008-03-23  Jay Belanger  <jay.p.belanger@gmail.com>
 
diff -r 3891784e87be -r 09cc3d0d41ce lisp/menu-bar.el
--- a/lisp/menu-bar.el	Sun Mar 23 11:21:14 2008 +0000
+++ b/lisp/menu-bar.el	Sun Mar 23 11:44:23 2008 +0000
@@ -748,7 +748,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."