From 1a14cacb787f7ceb309e311474ad8c7cc7c6355e Mon Sep 17 00:00:00 2001 From: jao Date: Fri, 9 Dec 2022 22:41:17 +0000 Subject: gnus: ask on quit --- custom/jao-custom-gnus.el | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'custom/jao-custom-gnus.el') diff --git a/custom/jao-custom-gnus.el b/custom/jao-custom-gnus.el index f5f0c10..5707c67 100644 --- a/custom/jao-custom-gnus.el +++ b/custom/jao-custom-gnus.el @@ -14,6 +14,13 @@ ;; close gnus when closing emacs, but ask when exiting (setq gnus-interactive-exit t) +;;; Startup and kill +(setq gnus-interactive-exit t) + +(defun jao-quit-gnus () (gnus-group-exit) t) + +(add-hook 'kill-emacs-query-functions #'jao-quit-gnus) + ;;; Directories (defun jao-gnus-dir (dir) (expand-file-name dir gnus-home-directory)) -- cgit v1.2.3