 ;; -*- no-byte-compile: t; -*-
 ;;; feature/workspaces/test/autoload-workspaces.el
 
-(load "persp-mode.el" nil t)
 (require! :feature workspaces)
 
 (defmacro with-workspace!! (buffer-args &rest body)

         (cl-loop for bsym in buffer-args
                  collect `(,bsym (get-buffer-create ,(symbol-name bsym))))))
    `(let ((persp-auto-resume-time -1)
           (persp-auto-save-opt 0)
           persp-autokill-buffer-on-remove
           persp-names-cache
           noninteractive)
       (+workspaces|init)
       (let* (,@buffers)
         (cl-loop with persp = (get-current-persp)
                  for buf in (list ,@(mapcar #'car buffers))

                  do (with-current-buffer buf
                       (setq buffer-file-name (make-temp-file "workspaces-test-"))))
         ,@body
         (let (kill-buffer-query-functions kill-buffer-hook)
           (mapc #'kill-buffer (list ,@(mapcar #'car buffers)))))
       (let (noninteractive)
         (persp-mode -1)))))

;; `+workspaces|init'
(def-test! init
