Mercurial > hg > xemacs-beta
diff lisp/w3/w3-toolbar.el @ 165:5a88923fcbfe r20-3b9
Import from CVS: tag r20-3b9
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:44:42 +0200 |
parents | 9f59509498e1 |
children |
line wrap: on
line diff
--- a/lisp/w3/w3-toolbar.el Mon Aug 13 09:43:39 2007 +0200 +++ b/lisp/w3/w3-toolbar.el Mon Aug 13 09:44:42 2007 +0200 @@ -1,7 +1,7 @@ ;;; w3-toolbar.el --- Toolbar functions for emacs-w3 ;; Author: wmperry -;; Created: 1997/03/26 00:01:47 -;; Version: 1.9 +;; Created: 1997/06/20 18:31:25 +;; Version: 1.10 ;; Keywords: mouse, toolbar ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -329,7 +329,8 @@ (popup-dialog-box descr))) (defun w3-add-toolbar-to-buffer () - (if (not (featurep 'toolbar)) + (if (or (not (featurep 'toolbar)) + (featurep 'infodock)) ; InfoDock uses different toolbars nil (let ((toolbar (w3-toolbar-from-orientation w3-toolbar-orientation))) (if toolbar