aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2004-09-04 13:06:38 +0000
committerEli Zaretskii2004-09-04 13:06:38 +0000
commit2a223f35db1bb47fb00f43191e7450b45bbd7fc4 (patch)
treea3bf94168c997c8974386c1863dca5b8d3cb6bf4
parentdb1febad5d7922e0fb69bc5262b526f1c46d968e (diff)
downloademacs-2a223f35db1bb47fb00f43191e7450b45bbd7fc4.tar.gz
emacs-2a223f35db1bb47fb00f43191e7450b45bbd7fc4.zip
Fix last change.
-rw-r--r--etc/NEWS11
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/simple.el8
3 files changed, 11 insertions, 10 deletions
diff --git a/etc/NEWS b/etc/NEWS
index 164da924255..0902888625c 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -247,11 +247,12 @@ The new file etc/compilation.txt gives examples of each type of message.
247Hits are fontified in green, and hits in binary files in orange. Grep buffers 247Hits are fontified in green, and hits in binary files in orange. Grep buffers
248can be saved and automatically revisited with the new Grep mode. 248can be saved and automatically revisited with the new Grep mode.
249 249
250** A new minor mode `next-error-follow-mode' can be used in 250** A new minor mode `next-error-follow-minor-mode' can be used in
251compilation-mode, grep-mode, occur-mode, and diff-mode (i.e. all the modes 251compilation-mode, grep-mode, occur-mode, and diff-mode (i.e. all the
252that can use `next-error') to associate cursor movements in 252modes that can use `next-error'). In this mode, cursor motion in the
253compilation, grep, occur or diff buffers with cursor movements in the 253buffer causes automatic display in another window of the corresponding
254target buffers. This minor mode can be toggled with C-c C-f. 254matches, compilation errors, etc. This minor mode can be toggled with
255C-c C-f.
255 256
256** M-x diff uses diff-mode instead of compilation-mode. 257** M-x diff uses diff-mode instead of compilation-mode.
257 258
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8fd27e78dac..0ae0ccc7def 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,7 +4,7 @@
4 4
52004-09-04 Dan Nicolaescu <dann@ics.uci.edu> 52004-09-04 Dan Nicolaescu <dann@ics.uci.edu>
6 6
7 * simple.el (next-error-follow-mode) 7 * simple.el (next-error-follow-minor-mode)
8 (next-error-follow-mode-post-command-hook): New functions. 8 (next-error-follow-mode-post-command-hook): New functions.
9 (next-error-follow-last-line): New defvar. 9 (next-error-follow-last-line): New defvar.
10 10
diff --git a/lisp/simple.el b/lisp/simple.el
index edf94cfd7d1..32405153788 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -253,11 +253,11 @@ If `fringe-arrow', indicate the locus by the fringe arrow."
253;;; Internal variable for `next-error-follow-mode-post-command-hook'. 253;;; Internal variable for `next-error-follow-mode-post-command-hook'.
254(defvar next-error-follow-last-line nil) 254(defvar next-error-follow-last-line nil)
255 255
256(define-minor-mode next-error-follow-mode 256(define-minor-mode next-error-follow-minor-mode
257 "Minor mode for compilation, occur and diff modes. 257 "Minor mode for compilation, occur and diff modes.
258When turned on, cursor motion in the compilation, occur or diff 258When turned on, cursor motion in the compilation, grep, occur or diff
259buffer determines the cursor in the corresponding buffer to move 259buffer causes automatic display of the corresponding source code
260to the corresponding position. " 260location."
261 nil " Fol" nil 261 nil " Fol" nil
262 (if (not next-error-follow-mode) 262 (if (not next-error-follow-mode)
263 (remove-hook 'post-command-hook 'next-error-follow-mode-post-command-hook t) 263 (remove-hook 'post-command-hook 'next-error-follow-mode-post-command-hook t)