branch: externals/do-at-point
commit a01cee0d72a472c22da8e6b799552cedfe1cab31
Author: Philip Kaludercic <philip.kaluder...@fau.de>
Commit: Philip Kaludercic <philip.kaluder...@fau.de>
Do not set the face of 'do-at-point--overlay' twice
---
do-at-point.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/do-at-point.el b/do-at-point.el
index f8bb8ee69f..a3e2727dd9 100644
--- a/do-at-point.el
+++ b/do-at-point.el
@@ -5,7 +5,7 @@
;; Author: Philip Kaludercic <phil...@posteo.net>
;; Maintainer: Philip Kaludercic <phil...@posteo.net>
;; URL: https://wwwcip.cs.fau.de/~oj14ozun/src+etc/do-at-point.el
-;; Version: $Id: do-at-point.el,v 1.24 2023/07/20 12:18:53 oj14ozun Exp
oj14ozun $
+;; Version: $Id: do-at-point.el,v 1.25 2023/07/20 15:23:52 oj14ozun Exp
oj14ozun $
;; Package-Version: 1
;; Package-Requires: ((emacs "26.1"))
;; Keywords: convenience
@@ -180,9 +180,8 @@ more to less specific entries."
(defvar-local do-at-point--overlay
(let ((ov (make-overlay 0 0)))
- (delete-overlay ov)
- (overlay-put ov 'face 'highlight)
(overlay-put ov 'face 'highlight)
+ (delete-overlay ov)
ov)
"Buffer-local overlay object to display the selection overlay.
The overlay is also used to store properties like the current
