awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-09-16 15:56:52 -05:00
Code Issues Packages Projects Releases 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