Abstract popwin defuns
This commit is contained in:
parent
0cd60e5ae8
commit
5193970d8f
13 changed files with 39 additions and 110 deletions
|
@ -9,15 +9,9 @@
|
|||
quickrun-replace-region
|
||||
helm-quickrun)
|
||||
:config
|
||||
(setq quickrun-focus-p nil)
|
||||
(add-to-list 'quickrun-file-alist '("\\.gvy$" . "groovy"))
|
||||
|
||||
(defun narf*quickrun-close-popwin ()
|
||||
(when (get-buffer quickrun/buffer-name)
|
||||
(quickrun/kill-quickrun-buffer)
|
||||
(popwin:close-popup-window-if-necessary)))
|
||||
(advice-add 'quickrun :before 'narf*quickrun-close-popwin)
|
||||
(advice-add 'quickrun-region :before 'narf*quickrun-close-popwin))
|
||||
(setq quickrun-focus-p t)
|
||||
(add-hook! quickrun/mode 'linum-mode)
|
||||
(add-to-list 'quickrun-file-alist '("\\.gvy$" . "groovy")))
|
||||
|
||||
(provide 'core-quickrun)
|
||||
;;; core-quickrun.el ends here
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue