alex/nixos-configs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

pinwheel: Handle stopping of emacsclient frames

Browse Source
This commit is contained in:
Alexander Heldt
2023-10-05 22:42:30 +02:00
parent df967b99b4
commit aebb39ef3d
1 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
hosts/pinwheel/modules/emacs/config.org
View File

@@ -83,7 +83,6 @@
* Setup * Setup
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(setq confirm-kill-processes nil)
#+END_SRC #+END_SRC
** Use wl-clipboard for interprocess copy/paste ** Use wl-clipboard for interprocess copy/paste
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
@@ -167,9 +166,17 @@
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(set-fringe-mode 10) (set-fringe-mode 10)
#+END_SRC #+END_SRC
** Faster "confirm kill" ** Handle killing of emacs/frame
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(setq confirm-kill-emacs 'y-or-n-p) (setq confirm-kill-emacs nil)
(setq confirm-kill-processes nil)
(define-advice delete-frame (:around (oldfun &rest args) confirm-frame-deletion)
"Confirm deleting the frame."
(interactive)
(when (y-or-n-p "Delete frame? ")
(save-some-buffers)
(apply oldfun args)))
#+END_SRC #+END_SRC
** Use ESC to quit prompts ** Use ESC to quit prompts
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp