emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Improve workgroups2 tab emulation

Browse source
This commit is contained in:
Henrik Lissner 2015-12-29 23:37:43 -05:00
parent af9003e529
commit 54c2541777
4 changed files with 45 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

16
core/core-workgroups.el
View file

@ -63,7 +63,21 @@ lib/defuns-workgroups.el.")
(advice-add 'wg-change-modeline :override 'ignore)
;; Don't remember popup windows
(add-hook! kill-emacs 'narf-popup-close-all))
(add-hook! kill-emacs 'narf-popup-close-all)
;; This helps abstract some of the underlying functions away, just in case I want to
;; switch to a different package in the future, like persp-mode, eyebrowse or wconf.
(defalias 'narf/helm-tabs 'narf:helm-wg)
(defalias 'narf/close-window-or-tab 'narf/close-window-or-workgroup)
(defalias 'narf:switch-to-tab 'narf:switch-to-workgroup-at-index)
(defalias 'narf/tab-display 'narf/workgroup-display)
(defalias 'narf:tab-create 'narf:workgroup-new)
(defalias 'narf:tab-rename 'narf:workgroup-rename)
(defalias 'narf:kill-tab 'narf:workgroup-delete)
(defalias 'narf:kill-other-tabs 'narf:kill-other-workgroups)
(defalias 'narf:switch-to-tab-left 'wg-switch-to-workgroup-left)
(defalias 'narf:switch-to-tab-right 'wg-switch-to-workgroup-right)
(defalias 'narf:switch-to-tab-last 'wg-switch-to-previous-workgroup))
(provide 'core-workgroups)
;;; core-workgroups.el ends here