diff options
| author | Miles Bader <miles@gnu.org> | 2002-05-25 05:15:07 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2002-05-25 05:15:07 +0000 |
| commit | 00cb70dc36ffb9b8aa5203ce71f6a122a6ce18e9 (patch) | |
| tree | 6a92f3f72668810a51cb829d886ba3b5617b2671 /lisp/menu-bar.el | |
| parent | e3f01f3086b7eadcad30fb13f59fa4a40c2ae7fd (diff) | |
| download | emacs-00cb70dc36ffb9b8aa5203ce71f6a122a6ce18e9.tar.gz | |
(menu-bar-showhide-fringe-menu-customize-left)
(menu-bar-showhide-fringe-menu-customize-right)
(menu-bar-showhide-fringe-menu-customize-disable):
Use proper calling convention for `customize-set-value'.
Require `fringe' before setting variable.
Diffstat (limited to 'lisp/menu-bar.el')
| -rw-r--r-- | lisp/menu-bar.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index c517cbd060b..4f6dd80bbf7 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -679,7 +679,8 @@ Do the same for the keys of the same name." (defun menu-bar-showhide-fringe-menu-customize-left () "Make fringes appear only on the left." (interactive) - (customize-set-variable 'fringe-mode nil '(nil . 0))) + (require 'fringe) + (customize-set-variable 'fringe-mode '(nil . 0))) (define-key menu-bar-showhide-fringe-menu [left] '(menu-item "On the Left" menu-bar-showhide-fringe-menu-customize-left @@ -690,7 +691,8 @@ Do the same for the keys of the same name." (defun menu-bar-showhide-fringe-menu-customize-right () "Make fringes appear only on the right." (interactive) - (customize-set-variable 'fringe-mode nil '(0 . nil))) + (require 'fringe) + (customize-set-variable 'fringe-mode '(0 . nil))) (define-key menu-bar-showhide-fringe-menu [right] '(menu-item "On the Right" menu-bar-showhide-fringe-menu-customize-right @@ -701,7 +703,8 @@ Do the same for the keys of the same name." (defun menu-bar-showhide-fringe-menu-customize-disable () "Make fringes disappear." (interactive) - (customize-set-variable 'fringe-mode nil 0)) + (require 'fringe) + (customize-set-variable 'fringe-mode 0)) (define-key menu-bar-showhide-fringe-menu [none] '(menu-item "None" menu-bar-showhide-fringe-menu-customize-disable |