Mercurial > emacs

comparison lisp/progmodes/grep.el @ 92230:d9373da2792d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(grep-mode-tool-bar-map): Change place on next and previous.
author Jan Djärv <jan.h.d@swipnet.se>
date Tue, 26 Feb 2008 14:41:01 +0000
parents ab425a596ec9
children 402ee2cfca27
comparison
equal deleted inserted replaced
92229:a917f8addf17 92230:d9373da2792d
222 222
223 (defvar grep-mode-tool-bar-map 223 (defvar grep-mode-tool-bar-map
224 (if (display-graphic-p) 224 (if (display-graphic-p)
225 (let ((map (butlast (copy-keymap tool-bar-map))) 225 (let ((map (butlast (copy-keymap tool-bar-map)))
226 (help (last tool-bar-map))) ;; Keep Help last in tool bar 226 (help (last tool-bar-map))) ;; Keep Help last in tool bar
227 (tool-bar-local-item
228 "left-arrow" 'previous-error-no-select 'previous-error-no-select map
229 :rtl "right-arrow"
230 :help "Goto previous match")
227 (tool-bar-local-item 231 (tool-bar-local-item
228 "right-arrow" 'next-error-no-select 'next-error-no-select map 232 "right-arrow" 'next-error-no-select 'next-error-no-select map
229 :rtl "left-arrow" 233 :rtl "left-arrow"
230 :help "Goto next match") 234 :help "Goto next match")
231 (tool-bar-local-item
232 "left-arrow" 'previous-error-no-select 'previous-error-no-select map
233 :rtl "right-arrow"
234 :help "Goto previous match")
235 (tool-bar-local-item 235 (tool-bar-local-item
236 "cancel" 'kill-compilation 'kill-compilation map 236 "cancel" 'kill-compilation 'kill-compilation map
237 :help "Stop grep") 237 :help "Stop grep")
238 (tool-bar-local-item 238 (tool-bar-local-item
239 "refresh" 'recompile 'recompile map 239 "refresh" 'recompile 'recompile map