diff --git a/modules/ui/workspaces/config.el b/modules/ui/workspaces/config.el index 030119695..39850f726 100644 --- a/modules/ui/workspaces/config.el +++ b/modules/ui/workspaces/config.el @@ -238,8 +238,9 @@ stored in `persp-save-dir'.") (defun +workspaces-reload-indirect-buffers-h (&rest _) (dolist (ibc +workspaces--indirect-buffers-to-restore) (cl-destructuring-bind (buffer-name . base-buffer-name) ibc - (when (buffer-live-p (get-buffer base-buffer-name)) - (when (get-buffer buffer-name) - (setq buffer-name (generate-new-buffer-name buffer-name))) - (make-indirect-buffer bb buffer-name t)))) + (let ((base-buffer (get-buffer base-buffer-name))) + (when (buffer-live-p base-buffer) + (when (get-buffer buffer-name) + (setq buffer-name (generate-new-buffer-name buffer-name))) + (make-indirect-buffer base-buffer buffer-name t))))) (setq +workspaces--indirect-buffers-to-restore nil))))