(show-paren-command-hook): Don't use value of make-face.

a1251f79 · Richard M. Stallman · f16a1ed3 · a1251f79
Commit a1251f79 authored Aug 11, 1993 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/paren.el lisp/paren.el +2 -1

No files found.
--- a/lisp/paren.el
+++ b/lisp/paren.el
@@ -82,8 +82,9 @@
 			   (or (setq show-paren-mismatch-face
 				     (internal-find-face 'paren-mismatch))
 			       (progn
+				 (make-face 'paren-mismatch)
 				 (setq show-paren-mismatch-face
-				       (make-face 'paren-mismatch))
+				       'paren-mismatch)
 				 (set-face-background 'paren-mismatch
 						      "purple"))))
 		      (if show-paren-mismatch-face