aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/replace.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/replace.el b/lisp/replace.el
index dcae12e9b76..b8f231eb55d 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1907,10 +1907,8 @@ See also `multi-occur'."
1907 global-matches))) 1907 global-matches)))
1908 1908
1909(defun occur-engine-line (beg end &optional keep-props) 1909(defun occur-engine-line (beg end &optional keep-props)
1910 (if (and keep-props (if (boundp 'jit-lock-mode) jit-lock-mode) 1910 (if (and keep-props font-lock-mode)
1911 (text-property-not-all beg end 'fontified t)) 1911 (font-lock-ensure beg end))
1912 (if (fboundp 'jit-lock-fontify-now)
1913 (jit-lock-fontify-now beg end)))
1914 (if (and keep-props (not (eq occur-excluded-properties t))) 1912 (if (and keep-props (not (eq occur-excluded-properties t)))
1915 (let ((str (buffer-substring beg end))) 1913 (let ((str (buffer-substring beg end)))
1916 (remove-list-of-text-properties 1914 (remove-list-of-text-properties