diff options
| author | Dmitry Gutov <dgutov@yandex.ru> | 2015-05-04 23:16:12 +0300 |
|---|---|---|
| committer | Dmitry Gutov <dgutov@yandex.ru> | 2015-05-04 23:24:36 +0300 |
| commit | 943c45f68b7b954f311ec3c1c35ed21830223333 (patch) | |
| tree | 0834c99f52bb736f519f2b11ef1dc34680490326 /lisp/progmodes | |
| parent | 255a011f0ecf004b31c59945b10154b10fac3af1 (diff) | |
| download | emacs-943c45f68b7b954f311ec3c1c35ed21830223333.tar.gz | |
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).
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/xref.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el index a73085f825d..ae0fbb82617 100644 --- a/lisp/progmodes/xref.el +++ b/lisp/progmodes/xref.el @@ -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 () |