From 432a5a9a5a492b5b564be3e99354568264b05c61 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sun, 28 Aug 2016 22:55:27 +0200 Subject: [PATCH] what-face: fix undefined variable error --- core/defuns/defuns-util.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/core/defuns/defuns-util.el b/core/defuns/defuns-util.el index 4226ca8cd..bbf316ae5 100644 --- a/core/defuns/defuns-util.el +++ b/core/defuns/defuns-util.el @@ -4,7 +4,7 @@ (defun what-face (pos) "Tells you the name of the face (point) is on." (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)) (let ((face (or (get-char-property (point) 'read-face-name) (get-char-property (point) 'face))))