diff options
Diffstat (limited to 'lisp/replace.el')
| -rw-r--r-- | lisp/replace.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index bb72acdf2cf..31963f7538c 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -1125,18 +1125,17 @@ See also `multi-occur'." (let* ((out-line (concat ;; Using 7 digits aligns tabs properly. - (apply #'propertize (format "%7d" lines) + (apply #'propertize (format "%7d:" lines) (append (when prefix-face `(font-lock-face prefix-face)) - `(occur-prefix t mouse-face highlight + `(occur-prefix t mouse-face (highlight) occur-target ,marker follow-link t help-echo "mouse-2: go to this occurrence"))) - ":" ;; We don't put `mouse-face' on the newline, ;; because that loses. And don't put it ;; on context lines to reduce flicker. - (propertize curstring 'mouse-face 'highlight + (propertize curstring 'mouse-face (list 'highlight) 'occur-target marker 'follow-link t 'help-echo |