1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

Don't pulse the indentation, or the newline

* lisp/cedet/pulse.el (pulse-lighten-highlight)
(pulse-reset-face): Fall back to the inherited background
attribute in FACE.
(pulse-momentary-highlight-region): Add autoload cookie.

* lisp/progmodes/xref.el (xref--maybe-pulse): Don't highlight the
indentation, or the newline, if the line's non-empty
(http://lists.gnu.org/archive/html/emacs-devel/2015-05/msg00118.html).
This commit is contained in:
Dmitry Gutov 2015-05-04 23:16:12 +03:00
parent 255a011f0e
commit 943c45f68b
2 changed files with 13 additions and 3 deletions

View file

@ -313,7 +313,15 @@ or when the command has been called with the prefix argument."
(defun xref--maybe-pulse ()
(when xref-pulse-on-jump
(pulse-momentary-highlight-one-line (point))))
(let (beg end)
(save-excursion
(back-to-indentation)
(if (eolp)
(setq beg (line-beginning-position)
end (1+ (point)))
(setq beg (point)
end (line-end-position))))
(pulse-momentary-highlight-region beg end 'next-error))))
;; etags.el needs this
(defun xref-clear-marker-stack ()