diff lisp/msw-init.el @ 288:e11d67e05968 r21-0b42

Import from CVS: tag r21-0b42
author cvs
date Mon, 13 Aug 2007 10:35:54 +0200
parents 558f606b08ae
children 2f8bb876ab1d
line wrap: on
line diff
--- a/lisp/msw-init.el	Mon Aug 13 10:35:07 2007 +0200
+++ b/lisp/msw-init.el	Mon Aug 13 10:35:54 2007 +0200
@@ -43,11 +43,10 @@
 (defun init-post-mswindows-win (console)
   "Initialize mswindows GUI at startup (post).  Don't call this."
   (unless mswindows-post-win-initted
-    ;; We can't load this until after the initial device is created
-    ;; because the icon initialization needs to access the display to get
-    ;; any toolbar-related color resources.
-    (if (and (featurep 'xpm) (featurep 'toolbar))
-        (init-x-toolbar))
+    (if (featurep 'toolbar)
+	(if (featurep 'infodock)
+	    (require 'id-x-toolbar)
+	  (init-x-toolbar)))
     (add-hook 'zmacs-deactivate-region-hook
 	      (lambda ()
 		(if (console-on-window-system-p)