evar/nix-templates
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

home-manager: inital commit

Browse source
This commit is contained in:
Evar Smith 2025-06-25 01:35:01 -04:00
parent faaaa3d324
commit 24717f490e
31 changed files with 1560 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

92
home/dev/doom.d/config-true-helix.el Normal file
View file

@ -0,0 +1,92 @@
;;; ../../../../mnt/c/Users/SmithEvar/.doom.d/config-true-helix.el -*- lexical-binding: t; -*-
;; TH specific stuff
(defvar my/work-devops-base-url "https://dev.azure.com/Helix076/Helix")
(defun make-helix-devops-pullrequest-link (pr-number)
(browse-url (concat my/work-devops-base-url "/_git/Helix/pullrequest/" pr-number)))
(defun make-mobile-devops-pullrequest-link (pr-number)
(browse-url (concat my/work-devops-base-url "/_git/Mobile/pullrequest/" pr-number)))
(defun make-apidomain-devops-pullrequest-link (pr-number)
(browse-url (concat my/work-devops-base-url "/_git/Helix.API.Domain/pullrequest/" pr-number)))
(defun make-infrastructure-devops-pullrequest-link (pr-number)
(browse-url (concat my/work-devops-base-url "/_git/Infrastructure/pullrequest/" pr-number)))
(defun make-devops-workitem-link (story-number)
(browse-url (concat my/work-devops-base-url "/_workitems/edit/" story-number)))
(defvar my/yas-devops-repo-list-expr '("helix" "mobile" "apidomain" "infrastructure"))
;; Work related TH stuff
(defvar my/work-org-file (concat my/org-dir-work "work.org"))
(defvar my/standups-priority-prompt-string "%^{prompt||[#A]|[#B]|[#C]}")
(defvar my/standups-people-prompt-string "%^{prompt|General|Cody|Corey|Emily|Evar|Mike|Nick|Melissa|Heather|Tom|Drew|Liz|Alex|Jared|Denise|Brian|Chris|Sam}")
(defvar my/devops-repo-prompt-string "%^{prompt|AutoHistory|CLinkDataImportTool|Helix|Helix.API.Domain|Mobile|Infrastructure|SampleDataTool}")
(defvar my/standups-default-properties-string "")
(after! org
(setq +org-capture-projects-file my/work-org-file)
(setq org-capture-templates
`(("g" "GTD Captures")
("gi" "inbox" entry
(file+olp ,my/work-org-file "Inbox")
,(concat "* TODO %?"))
("gf" "followup" entry
(file+olp ,my/work-org-file "Inbox")
,(concat "* TODO " my/standups-people-prompt-string " - %?" my/standups-default-properties-string))
;("f" "Followup" entry (file+olp ,my/work-org-file "Active" "Followups")
; ,(concat "* TODO " my/standups-priority-prompt-string " " my/standups-people-prompt-string " - %? :actionable:" my/standups-default-properties-string))
("p" "Centralized templates for projects")
("pt" "Project todo" entry
(function +org-capture-central-project-todo-file)
"* TODO %?\n %i\n %a"
:heading "Tasks"
:parents ("Code Notes")
:prepend nil)
("pn" "Project notes" entry
(function +org-capture-central-project-notes-file)
"* %U %?\n %i\n %a"
:heading "Misc"
:parents ("Code Notes")
:prepend t)
("s" "Standups")
("sa" "Announcement" entry (file+olp ,my/work-org-file "Active" "Announcements")
,(concat "* " my/standups-people-prompt-string " - %? :announcement:"))))
(org-add-link-type "devops-workitem" #'make-devops-workitem-link)
(org-add-link-type "devops-helix-pr" #'make-helix-devops-pullrequest-link)
(org-add-link-type "devops-mobile-pr" #'make-mobile-devops-pullrequest-link)
(org-add-link-type "devops-apidomain-pr" #'make-apidomain-devops-pullrequest-link)
(org-add-link-type "devops-infrastructure-pr" #'make-infrastructure-devops-pullrequest-link))
(defun th-today ()
(interactive)
(let ((file-name "daily-reviews.org")
(header-format (format-time-string "%Y-%m-%d %A")))
(find-file (concat my/org-dir-work file-name))
(-if-let* [(header-pos (org-find-exact-headline-in-buffer header-format (current-buffer) t))]
(goto-char header-pos)
(goto-char (point-max))
(newline 2)
(let ((snippet (yas-lookup-snippet "GTD Daily Review" #'org-mode)))
(yas-expand-snippet snippet)
(org-clock-in)))
(unless (not (eq winum--window-count 1))
(split-window-vertically)
(org-agenda nil "n")
(setq org-agenda-todo-ignore-scheduled 'all)
(org-agenda-goto-today)
(org-agenda-day-view)
(org-agenda-log-mode)
(evil-window-rotate-downwards))))
(defun th-standups ()
(interactive)
(let ((file-name "standups.org")
(header-format (format-time-string "%Y-%m-%d %A")))
(find-file (concat my/org-dir-work file-name))
(-if-let* [(header-pos (org-find-exact-headline-in-buffer header-format (current-buffer) t))]
(goto-char header-pos)
(goto-char (point-max))
(newline 2)
(let ((snippet (yas-lookup-snippet "True Helix standup minutes" #'org-mode)))
(yas-expand-snippet snippet)))))