diff --git a/src/workgroups2.el b/src/workgroups2.el index ad30335..fac42cd 100644 --- a/src/workgroups2.el +++ b/src/workgroups2.el @@ -1938,6 +1938,8 @@ as Workgroups' command remappings." (cond ((not wg-restore-point) win-start) ((eq win-point :max) (point-max)) (t win-point))) + (dolist (pair (wg-win-parameter win 'window-parameters)) + (set-window-parameter window (car pair) (cdr pair))) (when (>= win-start (point-max)) (recenter)))) (when wg-restore-window-dedicated-p @@ -1990,6 +1992,10 @@ Return value." :minibuffer-scroll (eq window minibuffer-scroll-window) :dedicated (window-dedicated-p window) :buf-uid (wg-buffer-uid-or-add (window-buffer window)))) + (wg-set-win-parameter win 'window-parameters (let ((result)) + (dolist (p (window-parameters window) result) + (when (cdr (assq (car p) window-persistent-parameters)) + (add-to-list 'result p t))))) (unless (version< emacs-version "24") ;; To solve: https://github.com/pashinin/workgroups2/issues/51 ;; shouldn't ignore here