From 2ed1f74d4a4c485980b8102d45a7172c82be5c7f Mon Sep 17 00:00:00 2001 From: Levi Date: Fri, 20 Sep 2024 11:47:49 +0200 Subject: [PATCH] work projects --- emacs/module/module-work-projects.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/emacs/module/module-work-projects.el b/emacs/module/module-work-projects.el index 0ffa205..8de16ae 100644 --- a/emacs/module/module-work-projects.el +++ b/emacs/module/module-work-projects.el @@ -10,9 +10,14 @@ (defun auto-create-work-project-perspectives () "Automatically create perspectives for projects if the directory exists." + (interactive) (let ((projects-dir "~/src/pascom/")) (when (file-directory-p projects-dir) - (create-perspectives-for-projects projects-dir)))) + (create-perspectives-for-projects projects-dir))) + (persp-switch "pascom20_cloudmanagement") + (dired "~/src/pascom20_cloudmanagement") + (persp-add-buffer current-buffer) + (persp-switch "main")) (provide 'module-work-projects) ;;; module-work-projects.el ends here.