diff options
| -rw-r--r-- | lisp/loadhist.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/loadhist.el b/lisp/loadhist.el index 95208bc7908..402a3ce35b9 100644 --- a/lisp/loadhist.el +++ b/lisp/loadhist.el | |||
| @@ -150,7 +150,7 @@ is nil, raise an error." | |||
| 150 | (if (or (and (boundp x) ; Random hooks. | 150 | (if (or (and (boundp x) ; Random hooks. |
| 151 | (consp (symbol-value x)) | 151 | (consp (symbol-value x)) |
| 152 | (string-match "-hooks?\\'" (symbol-name x))) | 152 | (string-match "-hooks?\\'" (symbol-name x))) |
| 153 | (and (fboundp x) ; Known abnormal hooks etc. | 153 | (and (boundp x) ; Known abnormal hooks etc. |
| 154 | (memq x loadhist-hook-functions))) | 154 | (memq x loadhist-hook-functions))) |
| 155 | (dolist (y (cdr flist)) | 155 | (dolist (y (cdr flist)) |
| 156 | (remove-hook x y)))))) | 156 | (remove-hook x y)))))) |