From d8fb118d2012a4325118f51a51b28b12661b1789 Mon Sep 17 00:00:00 2001 From: David Aspinall Date: Thu, 5 Mar 2015 09:31:40 +0000 Subject: Fix compile error with make-face --- phox/phox-sym-lock.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'phox') diff --git a/phox/phox-sym-lock.el b/phox/phox-sym-lock.el index 6b3874fd..ef3a9273 100644 --- a/phox/phox-sym-lock.el +++ b/phox/phox-sym-lock.el @@ -249,7 +249,7 @@ given OBJ under `phox-sym-lock-adobe-symbol-face' and all other characters to the empty string. OBJ may either be a string or a character." (let* ((name (phox-sym-lock-gen-symbol "face")) (table (make-display-table)) - (tface (make-face name "phox-sym-lock-remap-face"))) + (tface (make-face name))) (fillarray table "") (aset table (string-to-char (substring pat (1- pos) pos)) (phox-sym-lock-translate-char-or-string obj)) @@ -266,7 +266,7 @@ the empty string. OBJ may either be a string or a character." (defvar phox-sym-lock-clear-face (let* ((name (phox-sym-lock-gen-symbol "face")) (table (make-display-table)) - (tface (make-face name "phox-sym-lock-remap-face"))) + (tface (make-face name))) (fillarray table "") (set-face-property tface 'display-table table) (set-face-property tface 'phox-sym-lock-remap 1) ; mark it -- cgit v1.2.3