Fix sticky names for workgroups/tabs
This commit is contained in:
parent
37ea71eff6
commit
72f8111ecf
1 changed files with 1 additions and 1 deletions
|
@ -124,7 +124,7 @@
|
|||
;;;###autoload
|
||||
(defun narf/workgroup-update-names (&optional wg)
|
||||
(let ((wg (or wg (wg-current-workgroup))))
|
||||
(unless (memq wg narf-wg-names)
|
||||
(unless (member (wg-workgroup-uid wg) narf-wg-names)
|
||||
(ignore-errors
|
||||
(let ((old-name (wg-workgroup-name wg))
|
||||
(new-name (f-filename (narf/project-root))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue