diff lisp/hyperbole/wrolo-menu.el @ 167:85ec50267440 r20-3b10

Import from CVS: tag r20-3b10
author cvs
date Mon, 13 Aug 2007 09:45:46 +0200
parents 376386a54a3c
children
line wrap: on
line diff
--- a/lisp/hyperbole/wrolo-menu.el	Mon Aug 13 09:44:44 2007 +0200
+++ b/lisp/hyperbole/wrolo-menu.el	Mon Aug 13 09:45:46 2007 +0200
@@ -150,7 +150,7 @@
     (popup-menu id-popup-wrolo-menu)))
 
 (cond ((null hyperb:window-system))
-      ((fboundp 'id-menubar-set)
+      ((and (featurep 'infodock) (fboundp 'id-menubar-set))
        ;; InfoDock under a window system
        (require 'id-menubars)
        (id-menubar-set 'wrolo-mode 'id-menubar-wrolo))