Add prefix to workspace names in the groups

gagbo · gagbo · commit c8bb2a80f907 · 2021-03-29T23:01:09.000+02:00
diff --git a/bufler.el b/bufler.el
@@ -1071,7 +1071,7 @@ NAME, okay, `checkdoc'?"
 
 (bufler-defauto-group workspace
   (when-let* ((names (buffer-local-value 'bufler-workspace-names buffer)))
-    names))
+    (mapcar (lambda (name) (concat "Workspace: " name)) names)))
 
 
 ;;;;;; Group-defining macro
