From 78c3549b0f5183bb3d062dfcc587a78252737c53 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 8 Jul 2017 13:47:17 +0200 Subject: [PATCH] New function (alias): +workspace-current --- modules/feature/workspaces/autoload/workspaces.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/modules/feature/workspaces/autoload/workspaces.el b/modules/feature/workspaces/autoload/workspaces.el index 796232208..c143c94fb 100644 --- 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."