diff options
Diffstat (limited to 'lisp/ps-print.el')
| -rw-r--r-- | lisp/ps-print.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ps-print.el b/lisp/ps-print.el index 19431c30d68..b51eb944696 100644 --- a/lisp/ps-print.el +++ b/lisp/ps-print.el @@ -6645,7 +6645,8 @@ If FACE is not a valid face name, use default face." (error "Unprinted PostScript")))) (cond ((fboundp 'add-hook) - (funcall 'add-hook 'kill-emacs-hook 'ps-kill-emacs-check)) + (unless noninteractive + (funcall 'add-hook 'kill-emacs-hook 'ps-kill-emacs-check))) (kill-emacs-hook (message "Won't override existing `kill-emacs-hook'")) (t |