;;; module-work-projects.el --- autoload work perspectives
;;;
;;; Commentary:
;;;
;;; Autoload work projects into perspectives.
;;;
;;; Code:

(require 'module-perspective)

(defun auto-create-work-project-perspectives ()
  "Automatically create perspectives for projects if the directory exists."
  (let ((projects-dir "~/src/pascom/"))
    (when (file-directory-p projects-dir)
      (create-perspectives-for-projects projects-dir))))

(provide 'module-work-projects)
;;; module-work-projects.el ends here.