diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2019-09-04 14:35:18 +0200 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2019-09-04 14:35:18 +0200 |
| commit | 3f30d98af9401562c68f3a0388cf16593eb572e5 (patch) | |
| tree | 65ad6fc17f4c989fe789695ab44ae17106caee22 | |
| parent | ed80d6d88cd8c14fd585390a1fa622ba4f7a67d0 (diff) | |
| download | emacs-3f30d98af9401562c68f3a0388cf16593eb572e5.tar.gz | |
Repair change to compilation-context-lines (bug#36832)
* lisp/progmodes/compile.el (compilation-set-window):
Restore proper behaviour when compilation-context-lines is nil,
which is the default.
| -rw-r--r-- | lisp/progmodes/compile.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index b7bd2243d90..c1f23b16aa6 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -2600,7 +2600,8 @@ column zero points to the current message." (goto-char mk) (beginning-of-line 1) (point))) - (set-window-point w mk)))) + (set-window-point w mk)) + (t (set-window-point w mk)))) (defvar-local compilation-arrow-overlay nil "Overlay with the before-string property of `overlay-arrow-string'. |