(menu-bar-showhide-scroll-bar-menu): Quote `window-system'.

2 files changed, 4 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d0057533bb5..396b666718f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2002-01-27  Pavel Jan,Bm(Bk  <Pavel@Janik.cz>
 
+        * menu-bar.el (menu-bar-showhide-scroll-bar-menu): Quote
+        `window-system'.
+
         * tmm.el (tmm-get-keymap): Honour :visible in `menu-item'.
         Add Keywords header.  Update Commentary section.
         Update copyright notice.
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 416832f9454..6234ca873f4 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -524,7 +524,7 @@ Do the same for the keys of the same name."
 
 (define-key menu-bar-showhide-menu [showhide-scroll-bar]
   (list 'menu-item "Scroll-Bar" menu-bar-showhide-scroll-bar-menu
-        :visible window-system
+        :visible 'window-system
         :help "Select scroll-bar mode"))
 
 (defun showhide-menu-bar ()