diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/loadhist.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/loadhist.el b/lisp/loadhist.el index 19d940a6450..cbeaaa62600 100644 --- a/lisp/loadhist.el +++ b/lisp/loadhist.el @@ -98,7 +98,8 @@ return the feature \(symbol\)." features) nil t))) -(defvar loadhist-hook-functions +(defvaralias 'loadhist-hook-functions 'unload-feature-special-hooks) +(defvar unload-feature-special-hooks '(after-change-functions after-insert-file-functions auto-fill-function before-change-functions blink-paren-function @@ -153,7 +154,7 @@ is nil, raise an error." (consp (symbol-value x)) (string-match "-hooks?\\'" (symbol-name x))) (and (boundp x) ; Known abnormal hooks etc. - (memq x loadhist-hook-functions))) + (memq x unload-feature-special-hooks))) (dolist (y (cdr flist)) (remove-hook x y)))))) (if (fboundp 'elp-restore-function) ; remove ELP stuff first |