lkn
/
syscfg
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add client to work projects

This commit is contained in:
Levi 2024-09-20 15:03:56 +02:00
parent 45deb66774
commit 45074190c9
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
emacs/module/module-work-projects.el
View File

@ -11,9 +11,16 @@
(defun auto-create-work-project-perspectives () (defun auto-create-work-project-perspectives ()
"Automatically create perspectives for projects if the directory exists." "Automatically create perspectives for projects if the directory exists."
(interactive) (interactive)
;; reduce context switching costs
(let ((projects-dir "~/src/pascom/mobydick")) (let ((projects-dir "~/src/pascom/mobydick"))
(when (file-directory-p projects-dir) (when (file-directory-p projects-dir)
(create-perspectives-for-projects projects-dir))) (create-perspectives-for-projects projects-dir)))
(let ((projects-dir "~/src/pascom/client"))
(when (file-directory-p projects-dir)
(create-perspectives-for-projects projects-dir)))
;; not much context switching for devops
(persp-switch "pascom20_cloudmanagement") (persp-switch "pascom20_cloudmanagement")
(dired "~/src/pascom/pascom20_cloudmanagement") (dired "~/src/pascom/pascom20_cloudmanagement")
(persp-add-buffer current-buffer) (persp-add-buffer current-buffer)