# HG changeset patch # User Jan Dj¸«£rv # Date 1204036875 0 # Node ID 1c697129d4da0a6cfe106bb58c40785cd0e4f693 # Parent d9373da2792d73901b4d6c9ec56666d2ded1877d (compilation-mode-tool-bar-map): The same. diff -r d9373da2792d -r 1c697129d4da lisp/progmodes/compile.el --- a/lisp/progmodes/compile.el Tue Feb 26 14:41:01 2008 +0000 +++ b/lisp/progmodes/compile.el Tue Feb 26 14:41:15 2008 +0000 @@ -1382,15 +1382,15 @@ (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 error") (tool-bar-local-item "right-arrow" 'next-error-no-select 'next-error-no-select map :rtl "left-arrow" :help "Goto next error") (tool-bar-local-item - "left-arrow" 'previous-error-no-select 'previous-error-no-select map - :rtl "right-arrow" - :help "Goto previous error") - (tool-bar-local-item "cancel" 'kill-compilation 'kill-compilation map :help "Stop compilation") (tool-bar-local-item