From 516907a2b9c749baa962fd456dee84875331ee58 Mon Sep 17 00:00:00 2001 From: Adrian Robert Date: Sun, 1 Feb 2009 17:32:52 +0000 Subject: [PATCH] * term/ns-win.el (ns-save-preferences): Save ns-confirm-quit option. --- lisp/ChangeLog | 4 ++++ lisp/term/ns-win.el | 3 +++ 2 files changed, 7 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c86e665a8eb..40d280d9bca 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2009-02-01 Adrian Robert + + * term/ns-win.el (ns-save-preferences): Save ns-confirm-quit option. + 2009-02-01 Michael Albinus Sync with Tramp 2.1.15. diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el index bb37ecbb705..430f4df72da 100644 --- a/lisp/term/ns-win.el +++ b/lisp/term/ns-win.el @@ -990,6 +990,7 @@ Lines are highlighted according to `ns-input-line'." (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 @@ Lines are highlighted according to `ns-input-line'." (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) -- 2.39.5