procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make argument optional in pulse-momentary-highlight-one-line

Browse source 
* lisp/cedet/pulse.el (pulse-momentary-highlight-one-line): Make
POINT optional (bug#50642) so that the function can be used more
easily from some hook functions.
This commit is contained in:
Lars Ingebrigtsen 2021-09-18 16:12:56 +02:00
parent 045a4fe94c
commit c19576759f
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/cedet/pulse.el
View file

@ -195,11 +195,13 @@ Optional argument FACE specifies the face to do the highlighting."
(remove-hook 'pre-command-hook #'pulse-momentary-unhighlight))
;;;###autoload
(defun pulse-momentary-highlight-one-line (point &optional face)
(defun pulse-momentary-highlight-one-line (&optional point face)
"Highlight the line around POINT, unhighlighting before next command.
If POINT is nil or missing, the current point is used instead.
Optional argument FACE specifies the face to do the highlighting."
(save-excursion
(goto-char point)
(goto-char (or point (point)))
(let ((start (point-at-bol))
(end (save-excursion
(end-of-line)