emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

what-face: fix undefined variable error

Browse source
This commit is contained in:
Henrik Lissner 2016-08-28 22:55:27 +02:00
parent 45c3efab84
commit 432a5a9a5a
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
core/defuns/defuns-util.el
View file

@ -4,7 +4,7 @@
(defun what-face (pos) (defun what-face (pos)
"Tells you the name of the face (point) is on." "Tells you the name of the face (point) is on."
(interactive "d") (interactive "d")
(let ((hl-line-p hl-line-mode)) (let ((hl-line-p (bound-and-true-p hl-line-mode)))
(if hl-line-p (hl-line-mode -1)) (if hl-line-p (hl-line-mode -1))
(let ((face (or (get-char-property (point) 'read-face-name) (let ((face (or (get-char-property (point) 'read-face-name)
(get-char-property (point) 'face)))) (get-char-property (point) 'face))))