(command-line): Don't invoke tool-bar-mode if it is not fboundp.

2 files changed, 6 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bed3852d9f..cb4bd363f8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-10-10  Eli Zaretskii  <[email protected]>
+
+	* startup.el (command-line): Don't invoke tool-bar-mode if it is
+	not fboundp.
+
 2008-10-09  Chong Yidong  <[email protected]>
 
 	* startup.el (command-line): Enable tool-bar-mode as long as it is
diff --git a/lisp/startup.el b/lisp/startup.el
index 0ffb6b8ffe..8c2fd91c3f 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -902,6 +902,7 @@ opening the first frame (e.g. open a connection to an X server).")
   ;; even in tty frames, which means that there is a tool-bar if Emacs
   ;; later opens a graphical frame.
   (unless (or noninteractive emacs-basic-display
+	      (not (fboundp 'tool-bar-mode))
   	      ;; The tool-bar-lines parameter is nil if starting on a
   	      ;; tty; it is 0 if starting on a graphical display with
   	      ;; the toolbar disabled via X resources.