From: Mattias Engdegård <mattiase@acm.org>
Date: Wed, 4 Sep 2019 12:35:18 +0000 (+0200)
Subject: Repair change to compilation-context-lines (bug#36832)
X-Git-Tag: emacs-27.0.90~1553^2~39
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3f30d98af9401562c68f3a0388cf16593eb572e5;p=emacs.git

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.
---

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'.