system-manager-wakasu
1;;; config-projects.el --- -*- lexical-binding: t; -*-
2;;; Commentary:
3;;; Project related configuration.
4;;; Code:
5
6(require 'json)
7
8(use-package project
9 :commands (project-find-file project-find-regexp vde/project-vterm vde/project-run-in-vterm)
10 :custom ((project-switch-commands '((?f "File" project-find-file)
11 (?g "Grep" project-find-regexp)
12 (?d "Dired" project-dired)
13 (?b "Buffer" project-switch-to-buffer)
14 (?q "Query replace" project-query-replace-regexp)
15 (?m "Magit" vde-project-magit-status)
16 (?e "Eshell" project-eshell)
17 (?E "Eat" vde/project-eat)
18 (?s "Vterm" vde/project-vterm)
19 (?R "README" vde/open-readme)
20 (?g "Checkout GitHub PR" checkout-github-pr)))
21 (project-mode-line t))
22 :bind (("C-x p v" . vde-project-magit-status)
23 ("C-x p s" . vde/project-vterm)
24 ("C-x p X" . vde/project-run-in-vterm)
25 ("C-x p E" . vde/project-eat)
26 ("C-x p G" . checkout-github-pr))
27 :init
28 ;; (require project-rootfile)
29 ;; (add-to-list 'project-find-functions #'project-rootfile-try-detect t)
30 ;; (setq project-rootfile-list '(".project"
31 ;; "default.nix" "flake.nix" ; nix
32 ;; "Makefile" "GNUMakefile" "CMakeLists.txt" ; Make & CMake
33 ;; "Cask" "Eldev" "Keg" "Eask" ; Emacs
34 ;; "stack.yaml" ; Haskell
35 ;; "Cargo.toml" ; Rust
36 ;; "go.mod" ; Go
37 ;; ))
38 :config
39 (setq vde/project-local-identifier '(".project")) ;; "go.mod"
40
41 ;; (add-hook 'project-find-functions #'vde/project-try-local)
42
43 (setq-default project-compilation-buffer-name-function 'project-prefixed-buffer-name)
44 (defun vde-project-magit-status ()
45 "Run `magit-status' on project."
46 (interactive)
47 (magit-status (vde-project--project-current)))
48
49 ;; (general-leader
50 ;; "p" '(:ignore :which-key "Project")
51 ;; "pp" #'(project-switch-project :which-key "Switch to Project")
52 ;; "ps" #'(project-search :which-key "Grep in Project")
53 ;; "pf" #'(project-find-file :which-key "Find in Project")
54 ;; "pd" #'(project-dired :which-key "Dired in Project")
55 ;; "pc" #'(project-compile :which-key "Compile in Project")
56 ;; "pb" #'(project-switch-to-buffer :which-key "Switch to Project Buffer")
57 ;; "pk" #'(project-kill-buffers :which-key "Kill Project Buffers")
58 ;; "ps" #'(vde/project-vterm :which-key "Start a vterm in Project")
59 ;; "pe" #'(project-eshell :which-key "Start a eshell in Project")
60 ;; "pE" #'(vde/project-eat :which-key "Start a eat term in Project")
61 ;; "px" #'(vde/project-run-in-vterm :which-key "Execute command in vterm in Project"))
62 )
63
64(use-package conner
65 :bind (("C-x p C" . conner-run-project-command))
66 :commands (conner-run-project-command)
67 :config
68 (require 'vterm))
69
70(use-package project-x
71 :after project
72 :config
73 (add-hook 'project-find-functions 'project-x-try-local 90)
74 (add-hook 'kill-emacs-hook 'project-x--window-state-write)
75 (add-to-list 'project-switch-commands
76 '(?j "Restore windows" project-x-windows) t)
77 :bind (("C-x p w" . project-x-window-state-save)
78 ("C-x p j" . project-x-window-state-load)))
79
80(use-package jira
81 :commands (jira-issues)
82 :config
83 (setq jira-base-url "https://issues.redhat.com"
84 jira-username "vdemeest@redhat.com"
85 jira-token (passage-get "redhat/issues/token/myji")
86 jira-token-is-personal-access-token t
87 jira-api-version 2
88 jira-issues-max-results 500))
89
90(provide 'config-projects)
91;;; config-projects.el ends here