diff --git a/src/workgroups-win.el b/src/workgroups-win.el
index fb2730e765468971928305690551c04ac22f40a2..97e94d81c9d9603ef7d1c09b01e50a72d8175a33 100644
--- a/src/workgroups-win.el
+++ b/src/workgroups-win.el
@@ -176,10 +176,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 'next-buffers
-                            (wg-pickel (remove nil (subseq (window-next-buffers window) 0 4))))
-      (wg-set-win-parameter win 'prev-buffers
-                            (wg-pickel (remove nil (subseq (window-prev-buffers window) 0 4))))
+      (wg-set-win-parameter
+       win 'next-buffers (wg-pickel (remove nil (cl-subseq (window-next-buffers window) 0 4))))
+      (wg-set-win-parameter
+       win 'prev-buffers (wg-pickel (remove nil (cl-subseq (window-prev-buffers window) 0 4))))
       )
     win))