diff options
| -rw-r--r-- | lisp/ChangeLog | 1 | ||||
| -rw-r--r-- | lisp/menu-bar.el | 6 |
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 @@ | |||
| 3 | * menu-bar.el (menu-bar-showhide-fringe-ind-menu) [mixed]: Fix | 3 | * menu-bar.el (menu-bar-showhide-fringe-ind-menu) [mixed]: Fix |
| 4 | radio button condition. | 4 | radio button condition. |
| 5 | [box]: Likewise. | 5 | [box]: Likewise. |
| 6 | [customize]: Add radio button. | ||
| 6 | 7 | ||
| 7 | 2008-03-20 Dan Nicolaescu <dann@ics.uci.edu> | 8 | 2008-03-20 Dan Nicolaescu <dann@ics.uci.edu> |
| 8 | 9 | ||
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")) | |||
| 745 | '(menu-item "Other (Customize)" | 745 | '(menu-item "Other (Customize)" |
| 746 | menu-bar-showhide-fringe-ind-customize | 746 | menu-bar-showhide-fringe-ind-customize |
| 747 | :help "Additional choices available through Custom buffer" | 747 | :help "Additional choices available through Custom buffer" |
| 748 | :visible (display-graphic-p))) | 748 | :visible (display-graphic-p) |
| 749 | :button (:radio . (not (member indicate-buffer-boundaries | ||
| 750 | '(nil left right | ||
| 751 | ((top . left) (bottom . right)) | ||
| 752 | ((t . right) (top . left)))))))) | ||
| 749 | 753 | ||
| 750 | (defun menu-bar-showhide-fringe-ind-mixed () | 754 | (defun menu-bar-showhide-fringe-ind-mixed () |
| 751 | "Display top and bottom indicators in opposite fringes, arrows in right." | 755 | "Display top and bottom indicators in opposite fringes, arrows in right." |