2017-09-23 20:29:39 +08:00
|
|
|
;;; feature/debugger/autoload/debug.el -*- lexical-binding: t; -*-
|
2017-06-08 17:47:56 +08:00
|
|
|
|
|
|
|
;;;###autoload
|
2017-09-23 20:29:39 +08:00
|
|
|
(defun +debugger/quit ()
|
2017-09-23 20:42:04 +08:00
|
|
|
"Quit the active debugger, if any."
|
2017-06-08 17:47:56 +08:00
|
|
|
(interactive)
|
2017-09-23 20:42:04 +08:00
|
|
|
(ignore-errors (call-interactively #'realgud:cmd-quit))
|
2017-06-08 17:47:56 +08:00
|
|
|
(doom/popup-close)
|
2017-09-23 20:42:04 +08:00
|
|
|
(when (featurep 'evil)
|
|
|
|
(evil-normal-state)))
|
2017-06-08 17:47:56 +08:00
|
|
|
|