From: Pavel Janík <Pavel@Janik.cz>
Date: Sun, 27 Jan 2002 14:19:16 +0000 (+0000)
Subject: (menu-bar-showhide-scroll-bar-menu): Quote `window-system'.
X-Git-Tag: ttn-vms-21-2-B4~16942
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a27aa3204e254a9d76c30007fbd3c9f75e6afb96;p=emacs.git

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

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 ()