andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(load-with-code-conversion):

Browse source 
Don't run kill-buffer-hook or kill-buffer-query-functions.
This commit is contained in:
Richard M. Stallman 1997-07-04 00:17:55 +00:00
parent 12eb843358
commit cfc70cdfd0
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/international/mule.el
View file

@ -63,7 +63,8 @@ Return t if file exists."
(set-buffer-modified-p nil))
;; Eval in the original buffer.
(eval-buffer buffer))
(kill-buffer buffer))
(let (kill-buffer-hook kill-buffer-query-functions)
(kill-buffer buffer)))
(let ((hook (assoc file after-load-alist)))
(if hook
(mapcar (function eval) (cdr hook))))