From f3d49eb1a85f4f2b62c0ccd9bce3796720e14237 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Wed, 23 Mar 2016 12:00:53 -0400 Subject: [PATCH] wg: create group on :save-session if none exists --- core/defuns/defuns-workgroup.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/core/defuns/defuns-workgroup.el b/core/defuns/defuns-workgroup.el index b35284a9e..08e9e8332 100644 --- a/core/defuns/defuns-workgroup.el +++ b/core/defuns/defuns-workgroup.el @@ -9,6 +9,8 @@ ;;;###autoload (autoload 'narf:save-session "defuns-workgroup" nil t) (evil-define-command narf:save-session (&optional bang session-name) (interactive "") + (unless (wg-current-workgroup t) + (wg-create-workgroup wg-first-wg-name)) (if session-name (wg-save-session-as (concat wg-workgroup-directory session-name) (not bang)) (wg-save-session)))