diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2010-10-18 13:26:25 -0400 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2010-10-18 13:26:25 -0400 |
commit | e48eb34332dc91de823314090451459ba2ffacbf (patch) | |
tree | 263cbc88b4c9b51f8b3101c17ed3026bd94c9b37 /lisp/cus-face.el | |
parent | df987d70a30d886cf9a54b94b4ddcc88c965ce07 (diff) | |
download | emacs-e48eb34332dc91de823314090451459ba2ffacbf.tar.gz |
Use unsafep to check for theme safety.
* cus-face.el (custom-theme-set-faces): Mark as a safe function.
* custom.el (custom-theme-set-variables): Mark as a safe function.
(load-theme): Check forms using unsafep.
Diffstat (limited to 'lisp/cus-face.el')
-rw-r--r-- | lisp/cus-face.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/cus-face.el b/lisp/cus-face.el index ebb20012afa..fd6db787d32 100644 --- a/lisp/cus-face.el +++ b/lisp/cus-face.el @@ -349,6 +349,8 @@ FACE's list property `theme-face' \(using `custom-push-theme')." (put face 'face-override-spec nil) (face-spec-set face spec t)))))))) +(put 'custom-theme-set-faces 'safe-function t) + ;; XEmacs compability function. In XEmacs, when you reset a Custom ;; Theme, you have to specify the theme to reset it to. We just apply ;; the next theme. |