Remove unused workgroup-helm integration
This commit is contained in:
parent
50e791d91f
commit
3faf57178c
3 changed files with 0 additions and 15 deletions
|
@ -37,11 +37,6 @@
|
||||||
wg-list-display-decor-current-right ""
|
wg-list-display-decor-current-right ""
|
||||||
wg-list-display-decor-previous-left ""
|
wg-list-display-decor-previous-left ""
|
||||||
wg-list-display-decor-previous-right "")
|
wg-list-display-decor-previous-right "")
|
||||||
:config
|
|
||||||
(defvar narf/helm-source-wg
|
|
||||||
'((name . "Workgroups")
|
|
||||||
(candidates . wg-workgroup-names)
|
|
||||||
(action . narf/wg-helm-switch-to-workgroup)))
|
|
||||||
|
|
||||||
(add-hook! emacs-startup (workgroups-mode +1))
|
(add-hook! emacs-startup (workgroups-mode +1))
|
||||||
:config
|
:config
|
||||||
|
|
|
@ -4,12 +4,6 @@
|
||||||
(defun narf/wg-helm-switch-to-workgroup (name)
|
(defun narf/wg-helm-switch-to-workgroup (name)
|
||||||
(wg-switch-to-workgroup (wg-get-workgroup name)))
|
(wg-switch-to-workgroup (wg-get-workgroup name)))
|
||||||
|
|
||||||
;;;###autoload
|
|
||||||
(defun narf:helm-wg ()
|
|
||||||
(interactive)
|
|
||||||
(require 'helm)
|
|
||||||
(helm :sources '(narf/helm-source-wg)))
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun narf/wg-projectile-switch-project ()
|
(defun narf/wg-projectile-switch-project ()
|
||||||
(let ((workgroup-name (file-name-nondirectory (directory-file-name (narf/project-root)))))
|
(let ((workgroup-name (file-name-nondirectory (directory-file-name (narf/project-root)))))
|
||||||
|
|
|
@ -126,10 +126,6 @@
|
||||||
:n "r" 'narf/vcs-revert-hunk)
|
:n "r" 'narf/vcs-revert-hunk)
|
||||||
|
|
||||||
:n "b" 'helm-bookmarks
|
:n "b" 'helm-bookmarks
|
||||||
:n "w" 'narf/tab-display
|
|
||||||
:n "W" 'narf/helm-tabs
|
|
||||||
|
|
||||||
:n "n" 'narf/neotree
|
|
||||||
:nv "l" 'narf/nlinum-toggle
|
:nv "l" 'narf/nlinum-toggle
|
||||||
|
|
||||||
:nv "qq" 'evil-save-and-quit
|
:nv "qq" 'evil-save-and-quit
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue