(grep-mode-tool-bar-map): Initialize it unconditionally.

diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index 3d9a7db57af205e150da32a2fe377f1555b2fad5..945c656e7d377d9a41371dcd6da2e661b5b9448a 100644 (file)
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -228,26 +228,25 @@ See `compilation-error-screen-columns'"
 `compilation-minor-mode-map' is a cdr of this.")
 
 (defvar grep-mode-tool-bar-map
-  (if (display-graphic-p)
-      (let ((map (butlast (copy-keymap tool-bar-map)))
-           (help (last tool-bar-map))) ;; Keep Help last in tool bar
-       (tool-bar-local-item
-        "left-arrow" 'previous-error-no-select 'previous-error-no-select map
-        :rtl "right-arrow"
-        :help "Goto previous match")
-       (tool-bar-local-item
-        "right-arrow" 'next-error-no-select 'next-error-no-select map
-        :rtl "left-arrow"
-        :help "Goto next match")
-       (tool-bar-local-item
-        "cancel" 'kill-compilation 'kill-compilation map
-        :enable '(let ((buffer (compilation-find-buffer)))
-                   (get-buffer-process buffer))
-        :help "Stop grep")
-       (tool-bar-local-item
-        "refresh" 'recompile 'recompile map
-        :help "Restart grep")
-       (append map help))))
+  (let ((map (butlast (copy-keymap tool-bar-map)))
+       (help (last tool-bar-map))) ;; Keep Help last in tool bar
+    (tool-bar-local-item
+     "left-arrow" 'previous-error-no-select 'previous-error-no-select map
+     :rtl "right-arrow"
+     :help "Goto previous match")
+    (tool-bar-local-item
+     "right-arrow" 'next-error-no-select 'next-error-no-select map
+     :rtl "left-arrow"
+     :help "Goto next match")
+    (tool-bar-local-item
+     "cancel" 'kill-compilation 'kill-compilation map
+     :enable '(let ((buffer (compilation-find-buffer)))
+               (get-buffer-process buffer))
+     :help "Stop grep")
+    (tool-bar-local-item
+     "refresh" 'recompile 'recompile map
+     :help "Restart grep")
+    (append map help)))
 
 (defalias 'kill-grep 'kill-compilation)