Mercurial > emacs
changeset 101741:57277ecc1e6e
* term/ns-win.el (ns-save-preferences): Save ns-confirm-quit option.
| author | Adrian Robert <Adrian.B.Robert@gmail.com> |
|---|---|
| date | Sun, 01 Feb 2009 17:32:52 +0000 |
| parents | 90b1877630e7 |
| children | 5ff0eba2ab1e |
| files | lisp/ChangeLog lisp/term/ns-win.el |
| diffstat | 2 files changed, 7 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Feb 01 16:32:26 2009 +0000 +++ b/lisp/ChangeLog Sun Feb 01 17:32:52 2009 +0000 @@ -1,3 +1,7 @@ +2009-02-01 Adrian Robert <Adrian.B.Robert@gmail.com> + + * term/ns-win.el (ns-save-preferences): Save ns-confirm-quit option. + 2009-02-01 Michael Albinus <michael.albinus@gmx.de> Sync with Tramp 2.1.15.
--- a/lisp/term/ns-win.el Sun Feb 01 16:32:26 2009 +0000 +++ b/lisp/term/ns-win.el Sun Feb 01 17:32:52 2009 +0000 @@ -990,6 +990,7 @@ (defvar ns-antialias-text) (defvar ns-use-qd-smoothing) (defvar ns-use-system-highlight-color) +(defvar ns-confirm-quit) (declare-function ns-set-resource "nsfns.m" (owner name value)) (declare-function ns-font-name "nsfns.m" (name)) @@ -1013,6 +1014,8 @@ (if ns-use-qd-smoothing "YES" "NO")) (ns-set-resource nil "UseSystemHighlightColor" (if ns-use-system-highlight-color "YES" "NO")) + (ns-set-resource nil "ConfirmQuit" + (if ns-confirm-quit "YES" "NO")) ;; Default frame parameters (let ((p (frame-parameters)) v)