diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2004-09-04 13:06:38 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2004-09-04 13:06:38 +0000 |
| commit | 2a223f35db1bb47fb00f43191e7450b45bbd7fc4 (patch) | |
| tree | a3bf94168c997c8974386c1863dca5b8d3cb6bf4 /lisp | |
| parent | db1febad5d7922e0fb69bc5262b526f1c46d968e (diff) | |
| download | emacs-2a223f35db1bb47fb00f43191e7450b45bbd7fc4.tar.gz | |
Fix last change.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/simple.el | 8 |
2 files changed, 5 insertions, 5 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8fd27e78dac..0ae0ccc7def 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -4,7 +4,7 @@ 2004-09-04 Dan Nicolaescu <dann@ics.uci.edu> - * simple.el (next-error-follow-mode) + * simple.el (next-error-follow-minor-mode) (next-error-follow-mode-post-command-hook): New functions. (next-error-follow-last-line): New defvar. 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." ;;; Internal variable for `next-error-follow-mode-post-command-hook'. (defvar next-error-follow-last-line nil) -(define-minor-mode next-error-follow-mode +(define-minor-mode next-error-follow-minor-mode "Minor mode for compilation, occur and diff modes. -When turned on, cursor motion in the compilation, occur or diff -buffer determines the cursor in the corresponding buffer to move -to the corresponding position. " +When turned on, cursor motion in the compilation, grep, occur or diff +buffer causes automatic display of the corresponding source code +location." nil " Fol" nil (if (not next-error-follow-mode) (remove-hook 'post-command-hook 'next-error-follow-mode-post-command-hook t) |