diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/custom.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/custom.el b/lisp/custom.el index bbee71ecf1f..d39bbb37e07 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -1176,9 +1176,7 @@ This function returns nil if no custom theme specifies a value for VARIABLE." (defun custom-theme-recalc-face (face) "Set FACE according to currently enabled custom themes." (if (facep face) - (let ((theme-faces (reverse (get face 'theme-face)))) - (dolist (spec theme-faces) - (face-spec-set face (cadr spec)))))) + (face-spec-recalc face))) ;;; XEmacs compability functions |