doomemacs/modules/ui/workspaces/autoload/evil.el

40 lines
1.8 KiB
EmacsLisp
Raw Normal View History

;;; ui/workspaces/autoload/evil.el -*- lexical-binding: t; -*-
;;;###if (modulep! :editor evil)
2017-02-19 18:40:39 -05:00
2019-04-25 22:19:41 -04:00
;;;###autoload (autoload '+workspace:save "ui/workspaces/autoload/evil" nil t)
2017-02-19 18:40:39 -05:00
(evil-define-command +workspace:save (&optional name)
"Ex wrapper around `+workspace/save-session'."
(interactive "<a>") (+workspace/save name))
2019-04-25 22:19:41 -04:00
;;;###autoload (autoload '+workspace:load "ui/workspaces/autoload/evil" nil t)
2017-02-19 18:40:39 -05:00
(evil-define-command +workspace:load (&optional name)
"Ex wrapper around `+workspace/load-session'."
(interactive "<a>") (+workspace/load name))
2019-04-25 22:19:41 -04:00
;;;###autoload (autoload '+workspace:new "ui/workspaces/autoload/evil" nil t)
2017-02-19 18:40:39 -05:00
(evil-define-command +workspace:new (bang name)
"Ex wrapper around `+workspace/new'. If BANG, clone the current workspace."
(interactive "<!><a>") (+workspace/new name bang))
2019-04-25 22:19:41 -04:00
;;;###autoload (autoload '+workspace:rename "ui/workspaces/autoload/evil" nil t)
2017-02-19 18:40:39 -05:00
(evil-define-command +workspace:rename (new-name)
"Ex wrapper around `+workspace/rename'."
(interactive "<a>") (+workspace/rename new-name))
2019-04-25 22:19:41 -04:00
;;;###autoload (autoload '+workspace:delete "ui/workspaces/autoload/evil" nil t)
2017-02-19 18:40:39 -05:00
(evil-define-command +workspace:delete ()
"Ex wrapper around `+workspace/kill'."
(interactive) (+workspace/kill (+workspace-current-name)))
2017-02-19 18:40:39 -05:00
2019-04-25 22:19:41 -04:00
;;;###autoload (autoload '+workspace:switch-next "ui/workspaces/autoload/evil" nil t)
2017-02-19 18:40:39 -05:00
(evil-define-command +workspace:switch-next (&optional count)
"Switch to next workspace. If COUNT, switch to COUNT-th workspace."
(interactive "<c>")
(if count (+workspace/switch-to count) (+workspace/cycle +1)))
2019-04-25 22:19:41 -04:00
;;;###autoload (autoload '+workspace:switch-previous "ui/workspaces/autoload/evil" nil t)
2017-02-19 18:40:39 -05:00
(evil-define-command +workspace:switch-previous (&optional count)
"Switch to previous workspace. If COUNT, switch to COUNT-th workspace."
(interactive "<c>")
(if count (+workspace/switch-to count) (+workspace/cycle -1)))