Конечно, у меня есть способ сделать это. Возможны уточнения, но это хорошая отправная точка.
Сначала я настраиваю переменную и советую функцию kill-emacs
(defvar bnb/really-kill-emacs nil)
(defadvice kill-emacs (around bnb/really-exit activate)
"Only kill emacs if the variable is true"
(if bnb/really-kill-emacs
ad-do-it)
(bnb/exit))
Функция bnb / exit просто делает кадр невидимым, как то, к чему вы привязаны C-x C-c .
У меня есть дополнительная функция для правильного выхода из Emacs, если это когда-либо необходимо. Это установит переменную и вызовет kill-emacs следующим образом.
(defun bnb/really-kill-emacs ()
(interactive)
(setq bnb/really-kill-emacs t)
(kill-emacs))