New function (alias): +workspace-current

2017-07-08 13:47:17 +02:00 · 2017-07-08 13:47:17 +02:00 · 78c3549b0f
commit 78c3549b0f
parent 9194d020e4
1 changed files with 3 additions and 0 deletions
--- a/modules/feature/workspaces/autoload/workspaces.el
+++ b/modules/feature/workspaces/autoload/workspaces.el
@ -73,6 +73,9 @@ perspectives."
        (error "%s is not an available workspace" name))
      persp)))

+;;;###autoload
+(defalias '+workspace-current #'get-current-persp)
+
 ;;;###autoload
 (defun +workspace-current-name ()
  "Get the name of the currently active workspace."