From 8e6322c898fa057c367f534b632c37d2261c4600 Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Sat, 26 Aug 2023 11:46:56 +1000 Subject: Fixing a few things --- emacs/.emacs.d/lisp/my/my-prog.el | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'emacs/.emacs.d/lisp/my/my-prog.el') diff --git a/emacs/.emacs.d/lisp/my/my-prog.el b/emacs/.emacs.d/lisp/my/my-prog.el index 2bb4745..558117b 100644 --- a/emacs/.emacs.d/lisp/my/my-prog.el +++ b/emacs/.emacs.d/lisp/my/my-prog.el @@ -387,6 +387,15 @@ left and the source buffer on the right. (interactive) (insert (file-name-base (buffer-file-name)) "-")) +;; override `debugger-quit' - delete instead quit window +(defun my-debugger-quit () + "Quit debugging and return to the top level." + (interactive) + (if (= (recursion-depth) 0) + (delete-window) + (top-level))) + +;;; prog-mode (defun my-prog-modes-setup () (setq-local comment-auto-fill-only-comments t) (auto-fill-mode) -- cgit v1.2.3