(command-line): For now, activate tool-bar-mode only

if XPM images are supported.
This commit is contained in:
Gerd Moellmann 2000-10-06 11:42:45 +00:00
parent 301d6830c0
commit 65d425aca5

View file

@ -655,6 +655,7 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
;; If frame was created with a tool bar, switch tool-bar-mode on.
(when (and (not noninteractive)
(memq window-system '(x w32))
(image-type-available-p 'xpm)
(> (frame-parameter nil 'tool-bar-lines) 0))
(tool-bar-mode t))