[nongnu] elpa/pacmacs 57b0e8566b 204/472: Get pacmacs-quit back

[ELPA Syncer]

branch: elpa/pacmacs
commit 57b0e8566bf16dad25f3af7edb889445cf149fd0
Author: rexim <reximkut@gmail.com>
Commit: rexim <reximkut@gmail.com>

    Get pacmacs-quit back
    
    I was accidentally removed
---
 pacmacs.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/pacmacs.el b/pacmacs.el
index 2dee7a0ee2..39c5844bda 100644
--- a/pacmacs.el
+++ b/pacmacs.el
@@ -203,6 +203,11 @@
   (pacmacs--object-type-at-p pacmacs--object-board
                              row column 'ghost))
 
+(defun pacmacs-quit ()
+  (interactive)
+  (when (get-buffer pacmacs-buffer-name)
+    (pacmacs--kill-buffer-and-its-window pacmacs-buffer-name)))
+
 (defun pacmacs--cell-tracked-p (row column)
   (pacmacs--cell-wrapped-get pacmacs--track-board row column))