diff lisp/utils/edit-toolbar.el @ 209:41ff10fd062f r20-4b3

Import from CVS: tag r20-4b3
author cvs
date Mon, 13 Aug 2007 10:04:58 +0200
parents 3d6bfa290dbd
children
line wrap: on
line diff
--- a/lisp/utils/edit-toolbar.el	Mon Aug 13 10:03:54 2007 +0200
+++ b/lisp/utils/edit-toolbar.el	Mon Aug 13 10:04:58 2007 +0200
@@ -191,7 +191,8 @@
 
 \\{edit-toolbar-map}"
   (setq mode-popup-menu edit-toolbar-menu)
-  (if current-menubar
+  (if (and (featurep 'menubar))
+      current-menubar
       (progn
 	(set (make-local-variable 'current-menubar)
 	     (copy-sequence current-menubar))