请问，如何在退出时禁用此提示：“选项已更改 - 保存它们？（y 或 n）”
或者，我希望这个特定问题的答案始终为“否”，无需进一步的键盘输入即可退出。
我的 Aquamacs 2.4 的 init.el 文件正在对选项进行更改，我不想通过对问题说“是”来创建自定义项。
谢谢。
这是来自customizations.el 的代码，如果我在退出时用“是”回答提示，则会生成该代码。
(custom-set-variables
'(aquamacs-additional-fontsets nil t)
'(aquamacs-customization-version-id 215 t)
'(aquamacs-tool-bar-user-customization nil t)
'(default-frame-alist (quote ((background-mode . light) (border-color . "black") (mouse-color . "black") (background-color . "white") (foreground-color . "black") (menu-bar-lines . 1) (cursor-type . box) (vertical-scroll-bars . right) (internal-border-width . 0) (left-fringe . 1) (right-fringe) (fringe) (cursor-color . "red") (tool-bar-lines . 0))))
'(global-flyspell-mode t)
'(global-hl-line-mode t)
'(global-linum-mode t)
'(global-show-newlines-mode t)
'(ns-tool-bar-display-mode (quote both) t)
'(ns-tool-bar-size-mode (quote regular) t)
'(size-indication-mode t)
'(visual-line-mode nil t))
(custom-set-faces
'(emacs-lisp-mode-default ((t (:inherit autoface-default :height 180 :family "Courier"))) t)
'(latex-mode-default ((t (:inherit default height 180 :family "Courier"))))
'(plain-tex-mode-default ((t (:inherit default :height 180 :family "Courier"))) t)
'(text-mode-default ((t (:inherit autoface-default :stipple nil :strike-through nil :underline nil :slant normal :weight normal :height 180 :width normal :family "Courier"))))
'(whitespace ((((class color) (background light)) (:background "white" :foreground "red" :weight ultra-bold :width ultra-expanded))))
'(whitespace-space ((((class color) (background light)) (:foreground "red")))))
这是退出时可见的调试消息：
Debugger entered--Lisp error: (quit)
old-y-or-n-p("Options have changed - save them? ")
(if (and long (not aquamacs-quick-yes-or-no-prompt)) (old-yes-or-no-p text) (old-y-or-n-p text))
(let ((text ...)) (if (and long ...) (old-yes-or-no-p text) (old-y-or-n-p text)))
(progn (and (fboundp ...) smart-frame-positioning-mode (smart-move-minibuffer-inside-screen f)) (let (...) (if ... ... ...)))
(if (or (and last-nonmenu-event ...) (not use-dialog-box) (not window-system)) (progn (and ... smart-frame-positioning-mode ...) (let ... ...)) (let (...) (if ... ...) ret))
(let ((f ...)) (make-frame-visible f) (raise-frame f) (if (or ... ... ...) (progn ... ...) (let ... ... ret)))
aquamacs-ask-for-confirmation("Options have changed - save them? \nYour customizations will be lost if you don't save them." nil "Save" "Don't Save")
(progn (aquamacs-ask-for-confirmation "Options have changed - save them? \nYour customizations will be lost if you don't save them." nil "Save" "Don't Save"))
(if (eq aquamacs-save-options-on-quit (quote ask)) (progn (aquamacs-ask-for-confirmation "Options have changed - save them? \nYour customizations will be lost if you don't save them." nil "Save" "Don't Save")) aquamacs-save-options-on-quit)
(and (or aquamacs-faces-changed (filter-list changed ...)) (if (eq aquamacs-save-options-on-quit ...) (progn ...) aquamacs-save-options-on-quit))
(if (and (or aquamacs-faces-changed ...) (if ... ... aquamacs-save-options-on-quit)) (aquamacs-menu-bar-options-save))
(let* ((changed ...)) (if (and ... ...) (aquamacs-menu-bar-options-save)))
(condition-case nil (let* (...) (if ... ...)) (error nil))
aquamacs-ask-to-save-options()
run-hook-with-args-until-failure(aquamacs-ask-to-save-options)
(and (or (not ...) (let ... ... ...)) (run-hook-with-args-until-failure (quote kill-emacs-query-functions)) (or (null confirm-kill-emacs) (funcall confirm-kill-emacs "Really exit Aquamacs? ")) (kill-emacs))
(progn (setq timer-idle-list) (save-some-buffers arg t) (and (or ... ...) (run-hook-with-args-until-failure ...) (or ... ...) (kill-emacs)))
(unwind-protect (progn (setq timer-idle-list) (save-some-buffers arg t) (and ... ... ... ...)) (setq timer-idle-list saved-timer-idle-list))
(let ((saved-timer-idle-list timer-idle-list)) (unwind-protect (progn ... ... ...) (setq timer-idle-list saved-timer-idle-list)))
aquamacs-save-buffers-kill-emacs(nil)
call-interactively(aquamacs-save-buffers-kill-emacs nil nil)