lib-tmux: remove window move defuns

This commit is contained in:
Henrik Lissner 2016-01-07 01:11:02 -05:00
parent 56c7d946cf
commit cbe8f2bd7f
2 changed files with 2 additions and 29 deletions

View file

@ -66,30 +66,5 @@
;; (defun narf/window (direction) ;; (defun narf/window (direction)
;; ) ;; )
;;;###autoload (autoload 'narf/evil-window-or-tmux "lib-tmux" nil t)
(evil-define-command narf/evil-window-or-tmux (count direction)
:repeat nil
(interactive "p")
(let ((start-window (selected-window)))
(ignore-errors (funcall (intern (format "evil-window-%s" direction)) count))
(when (eq start-window (selected-window))
(os-switch-to-term))))
;;;###autoload (autoload 'narf/evil-window-left "lib-tmux" nil t)
(evil-define-command narf/evil-window-left (count)
:repeat nil (interactive "p") (narf/evil-window-or-tmux count 'left))
;;;###autoload (autoload 'narf/evil-window-right "lib-tmux" nil t)
(evil-define-command narf/evil-window-right (count)
:repeat nil (interactive "p") (narf/evil-window-or-tmux count 'right))
;;;###autoload (autoload 'narf/evil-window-up "lib-tmux" nil t)
(evil-define-command narf/evil-window-up (count)
:repeat nil (interactive "p") (narf/evil-window-or-tmux count 'up))
;;;###autoload (autoload 'narf/evil-window-down "lib-tmux" nil t)
(evil-define-command narf/evil-window-down (count)
:repeat nil (interactive "p") (narf/evil-window-or-tmux count 'down))
(provide 'lib-tmux) (provide 'lib-tmux)
;;; lib-tmux.el ends here ;;; lib-tmux.el ends here

View file

@ -44,7 +44,7 @@
"C-j" 'evil-window-down "C-j" 'evil-window-down
"C-k" 'evil-window-up "C-k" 'evil-window-up
"C-h" 'evil-window-left "C-h" 'evil-window-left
"C-l" 'narf/evil-window-right ; switch to tmux if fails "C-l" 'evil-window-right ; switch to tmux if fails
"C-<escape>" 'evil-emacs-state "C-<escape>" 'evil-emacs-state
:e "C-<escape>" 'evil-normal-state :e "C-<escape>" 'evil-normal-state
@ -299,9 +299,7 @@
"C-h" 'evil-window-left "C-h" 'evil-window-left
"C-j" 'evil-window-down "C-j" 'evil-window-down
"C-k" 'evil-window-up "C-k" 'evil-window-up
"C-l" 'evil-window-right
"l" 'narf/evil-window-right ; Switch to tmux if no window
"C-l" 'narf/evil-window-right ; Switch to tmux if no window
"C-w" 'ace-window "C-w" 'ace-window
"C-S-w" (λ! (ace-window 4)) ; swap windows "C-S-w" (λ! (ace-window 4)) ; swap windows