X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Ftoolbar.el;h=18a0e448505b87500fd35295d9b6a0a70dfb9763;hb=63c876c50ae875aaf1b12a56a16b9456014135aa;hp=446ce940106d58a3ec725ab35f517ee2799177cb;hpb=6883ee56ec887c2c48abe5b06b5e66aa74031910;p=chise%2Fxemacs-chise.git

diff --git a/lisp/toolbar.el b/lisp/toolbar.el
index 446ce94..18a0e44 100644
--- a/lisp/toolbar.el
+++ b/lisp/toolbar.el
@@ -36,9 +36,9 @@
 customized through the options menu."
   :group 'display
   :type 'boolean
-  :set '(lambda (var val)
-	  (set-specifier default-toolbar-visible-p val)
-	  (setq toolbar-visible-p val))
+  :set #'(lambda (var val)
+	   (set-specifier default-toolbar-visible-p val)
+	   (setq toolbar-visible-p val))
   )
 
 (defcustom toolbar-captioned-p ;; added for the options menu - dverna apr. 98
@@ -47,9 +47,9 @@ customized through the options menu."
 customized through the options menu."
   :group 'display
   :type 'boolean
-  :set '(lambda (var val)
-	  (set-specifier toolbar-buttons-captioned-p val)
-	  (setq toolbar-captioned-p val))
+  :set #'(lambda (var val)
+	   (set-specifier toolbar-buttons-captioned-p val)
+	   (setq toolbar-captioned-p val))
   )
 
 (defcustom default-toolbar-position ;; added for the options menu - dverna
@@ -61,9 +61,9 @@ customized through the options menu."
 		 (const :tag "bottom" 'bottom)
 		 (const :tag "left" 'left)
 		 (const :tag "right" 'right))
-  :set '(lambda (var val)
-	  (set-default-toolbar-position val)
-	  (setq default-toolbar-position val))
+  :set #'(lambda (var val)
+	   (set-default-toolbar-position val)
+	   (setq default-toolbar-position val))
   )
 
 (defvar toolbar-help-enabled t