diff options
Diffstat (limited to 'lisp/progmodes/compile.el')
| -rw-r--r-- | lisp/progmodes/compile.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 9e2d625a4d4..f13906680cf 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -951,7 +951,7 @@ from a different message." (defvar compilation--previous-directory-cache nil "A pair (POS . RES) caching the result of previous directory search. Basically, this pair says that calling - (previous-single-property-change POS 'compilation-directory) + (previous-single-property-change POS \\='compilation-directory) returned RES, i.e. there is no change of `compilation-directory' between POS and RES.") (make-variable-buffer-local 'compilation--previous-directory-cache) @@ -967,7 +967,7 @@ POS and RES.") (t (setq compilation--previous-directory-cache nil)))) (defun compilation--previous-directory (pos) - "Like (previous-single-property-change POS 'compilation-directory), but faster." + "Like (previous-single-property-change POS \\='compilation-directory), but faster." ;; This avoids an N² behavior when there's no/few compilation-directory ;; entries, in which case each call to previous-single-property-change ;; ends up having to walk very far back to find the last change. @@ -2594,7 +2594,7 @@ and overlay is highlighted between MK and END-MK." (goto-char mk))) (if end-mk (push-mark end-mk t) - (if mark-active (setq mark-active))) + (if mark-active (setq mark-active nil))) ;; If hideshow got in the way of ;; seeing the right place, open permanently. (dolist (ov (overlays-at (point))) |