diff options
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) |