diff options
| author | Eli Zaretskii | 2004-09-06 18:51:57 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2004-09-06 18:51:57 +0000 |
| commit | 8a98a6c2fe48e2ecbb14fafcddfa66259ce6284d (patch) | |
| tree | 14bf3106a1e6f8becbd0be23692b34bca33d40ae | |
| parent | c28e534b74e2d25cb71cbb0bd33f7cc677300903 (diff) | |
| download | emacs-8a98a6c2fe48e2ecbb14fafcddfa66259ce6284d.tar.gz emacs-8a98a6c2fe48e2ecbb14fafcddfa66259ce6284d.zip | |
(next-error-follow-minor-mode): Fix last change.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/simple.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index dbc91232333..641f08870ac 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2004-09-06 Eli Zaretskii <eliz@gnu.org> | ||
| 2 | |||
| 3 | * simple.el (next-error-follow-minor-mode): Fix last change. | ||
| 4 | |||
| 1 | 2004-09-05 Luc Teirlinck <teirllm@auburn.edu> | 5 | 2004-09-05 Luc Teirlinck <teirllm@auburn.edu> |
| 2 | 6 | ||
| 3 | * textmodes/paragraphs.el (use-hard-newlines): Make it into a | 7 | * textmodes/paragraphs.el (use-hard-newlines): Make it into a |
diff --git a/lisp/simple.el b/lisp/simple.el index 32405153788..75d2cef8499 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -259,7 +259,7 @@ When turned on, cursor motion in the compilation, grep, occur or diff | |||
| 259 | buffer causes automatic display of the corresponding source code | 259 | buffer causes automatic display of the corresponding source code |
| 260 | location." | 260 | location." |
| 261 | nil " Fol" nil | 261 | nil " Fol" nil |
| 262 | (if (not next-error-follow-mode) | 262 | (if (not next-error-follow-minor-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) |
| 264 | (add-hook 'post-command-hook 'next-error-follow-mode-post-command-hook nil t) | 264 | (add-hook 'post-command-hook 'next-error-follow-mode-post-command-hook nil t) |
| 265 | (make-variable-buffer-local 'next-error-follow-last-line))) | 265 | (make-variable-buffer-local 'next-error-follow-last-line))) |