caranmegil/whompmacs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added success status messages

Browse Source
This commit is contained in:
Mike 'Fuzzy' Partin 2024-07-10 02:09:09 -07:00
parent 5d942245b9
commit d94f547584
2 changed files with 22 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
thwap/thwap-defaults.el
View File

@ -28,7 +28,7 @@
(straight-use-package 'golden-ratio) (straight-use-package 'golden-ratio)
(golden-ratio-mode 1) (golden-ratio-mode 1)
(setq golden-ratio-auto-scale t) (setq golden-ratio-auto-scale t)
(message "Golden Ratio Mode Enabled")
;; ;;
;; Set up the T.H.W.A.P. keybindings ;; Set up the T.H.W.A.P. keybindings
@ -54,11 +54,13 @@
(straight-use-package 'yasnippet) (straight-use-package 'yasnippet)
(require 'yasnippet) (require 'yasnippet)
(setq yas-snippet-dirs '("~/.emacs.d/snippets")) (setq yas-snippet-dirs '("~/.emacs.d/snippets"))
(message "Yasnippet loaded")
(straight-use-package 'yasnippet-snippets) (straight-use-package 'yasnippet-snippets)
(require 'yasnippet-snippets) (require 'yasnippet-snippets)
(yas-reload-all) (yas-reload-all)
(yas-global-mode 1) (yas-global-mode 1)
(message "Yasnippet-Snippets loaded")
;; yasnippet stuff ;; yasnippet stuff
(thwap/add-key-binding "y n" 'yas-new-snippet "Create a new yasnippet") (thwap/add-key-binding "y n" 'yas-new-snippet "Create a new yasnippet")

28
thwap/thwap-orgmode.el
View File

@ -84,29 +84,35 @@
(thwap/add-key-binding "o c o" 'org-clock-out "Clock out of the current task.") (thwap/add-key-binding "o c o" 'org-clock-out "Clock out of the current task.")
(thwap/add-key-binding "o c r" 'org-clock-report "Generate a clock report.") (thwap/add-key-binding "o c r" 'org-clock-report "Generate a clock report.")
(thwap/add-key-binding "o r" 'org-refile "Refile the current task.") (thwap/add-key-binding "o r" 'org-refile "Refile the current task.")
(thwap/add-key-binding "o e" 'org-export-dispatch "Export the current buffer.")) (thwap/add-key-binding "o e" 'org-export-dispatch "Export the current buffer.")
(message "org-mode loaded"))
;; org-bullets ;; org-bullets
(when (and (memq 'orgmode thwap-orgmode) (memq 'orgbullets thwap-orgmode)) (when (and (memq 'orgmode thwap-orgmode) (memq 'orgbullets thwap-orgmode))
(straight-use-package 'org-bullets) (straight-use-package 'org-bullets)
(add-hook 'org-mode-hook (lambda () (org-bullets-mode 1)))) (add-hook 'org-mode-hook (lambda () (org-bullets-mode 1)))
(message "org-bullets loaded"))
;; org-super-agenda ;; org-super-agenda
(when (and (memq 'orgmode thwap-orgmode) (memq 'orgsuperagenda thwap-orgmode)) (when (and (memq 'orgmode thwap-orgmode) (memq 'orgsuperagenda thwap-orgmode))
(straight-use-package 'org-super-agenda) (straight-use-package 'org-super-agenda)
(add-hook 'org-agenda-mode-hook 'org-super-agenda-mode)) (add-hook 'org-agenda-mode-hook 'org-super-agenda-mode)
(message "org-super-agenda loaded"))
;; org-modern ;; org-modern
(when (and (memq 'orgmode thwap-orgmode) (memq 'orgmodern thwap-orgmode)) (when (and (memq 'orgmode thwap-orgmode) (memq 'orgmodern thwap-orgmode))
(straight-use-package 'org-modern)) (straight-use-package 'org-modern)
(message "org-modern loaded"))
;; org-timeblock ;; org-timeblock
(when (and (memq 'orgmode thwap-orgmode) (memq 'orgtimeblock thwap-orgmode)) (when (and (memq 'orgmode thwap-orgmode) (memq 'orgtimeblock thwap-orgmode))
(straight-use-package 'org-timeblock)) (straight-use-package 'org-timeblock)
(message "org-timeblock loaded"))
;; org-download ;; org-download
(when (and (memq 'orgmode thwap-orgmode) (memq 'orgdownload thwap-orgmode)) (when (and (memq 'orgmode thwap-orgmode) (memq 'orgdownload thwap-orgmode))
(add-hook 'dired-mode-hook 'org-download-enable)) (add-hook 'dired-mode-hook 'org-download-enable)
(message "org-download loaded"))
;; org-roam ;; org-roam
;; (when (and thwap-org-enable-org thwap-org-enable-org-roam) ;; (when (and thwap-org-enable-org thwap-org-enable-org-roam)
@ -130,13 +136,15 @@
;; org-transclusion ;; org-transclusion
(when (and (memq 'orgmode thwap-orgmode) (memq 'orgtransclusion thwap-orgmode)) (when (and (memq 'orgmode thwap-orgmode) (memq 'orgtransclusion thwap-orgmode))
(straight-use-package 'org-transclusion)) (straight-use-package 'org-transclusion)
(message "org-transclusion loaded"))
;; ob-mermaid ;; ob-mermaid
(when (and (memq 'orgmode thwap-orgmode) (memq 'obmermaid thwap-orgbabel)) (when (and (memq 'orgmode thwap-orgmode) (memq 'obmermaid thwap-orgbabel))
(straight-use-package 'ob-mermaid) (straight-use-package 'ob-mermaid)
(add-to-list 'org-src-lang-modes '("mermaid" . mermaid)) (add-to-list 'org-src-lang-modes '("mermaid" . mermaid))
(add-to-list 'org-babel-load-languages '(mermaid . t))) (add-to-list 'org-babel-load-languages '(mermaid . t))
(message "ob-mermaid loaded"))
;; org-ai ;; org-ai
(when (and (memq 'orgmode thwap-orgmode) thwap-org-openai-api-token) (when (and (memq 'orgmode thwap-orgmode) thwap-org-openai-api-token)
@ -147,8 +155,10 @@
(setq org-ai-default-chat-model "gpt-3.5-turbo") (setq org-ai-default-chat-model "gpt-3.5-turbo")
(setq org-ai-openai-api-token thwap-org-openai-api-token) (setq org-ai-openai-api-token thwap-org-openai-api-token)
(org-ai-global-mode) (org-ai-global-mode)
(org-ai-install-yasnippets)) (org-ai-install-yasnippets)
(message "org-ai loaded"))
(message "T.H.W.A.P. Org-Mode settings loaded")
(provide 'thwap-orgmode) (provide 'thwap-orgmode)
;; thwap-orgmode.el ends here ;; thwap-orgmode.el ends here