minhtrannhat/dots
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Feat: Update

Browse Source
This commit is contained in:
minhtrannhat
2023-01-01 09:54:13 -05:00
parent a1ad7fffc0
commit d1288eaa7d
15 changed files with 233 additions and 109 deletions
Download Patch File Download Diff File Expand all files Collapse all files

78
doom-emacs/.doom.d/config.el
View File

@@ -55,6 +55,8 @@
(setq display-line-numbers-type 'relative)
(setq ispell-alternate-dictionary "/home/minhradz/.english.dict.txt")
(add-hook 'spell-fu-mode-hook
(lambda ()
(spell-fu-dictionary-add (spell-fu-get-ispell-dictionary "en"))
@@ -175,12 +177,13 @@
:desc "Search org-roam with consult-ripgrep"
"n r F" #'org-roam-rg-search)
(setq org-roam-node-display-template
#("${doom-hierarchy:20} ${doom-type:12} ${doom-tags:42}" 20 35
(face font-lock-keyword-face)
36 51
(face org-tag))
)
;; (setq org-roam-node-display-template
;; #("${doom-hierarchy:20} ${doom-type:12} ${doom-tags:42}" 20 35
;; (face font-lock-keyword-face)
;; 36 51
;; (face org-tag))
;; )
(set-file-template! "/roam/.+\\.org$" 'org-mode :ignore t)
(setq avy-all-windows 't)
@@ -274,6 +277,9 @@
;; Clojure stuffs
(setq clojure-indent-style :always-align)
(eval-after-load 'cider
#'emidje-setup)
(defun delete-file-and-buffer ()
"Kill the current buffer and deletes the file it is visiting."
(interactive)
@@ -286,19 +292,49 @@
(kill-buffer)))
(message "Not a file visiting buffer!"))))
;; email stuffs
;; Each path is relative to the path of the maildir you passed to mu
(set-email-account! "minhtrannhat.com"
'((mu4e-sent-folder . "/minhtrannhat@minhtrannhat.com/Sent")
(mu4e-drafts-folder . "/minhtrannhat@minhtrannhat.com/Drafts")
(mu4e-trash-folder . "/minhtrannhat@minhtrannhat.com/Trash")
(mu4e-refile-folder . "/minhtrannhat@minhtrannhat.com/All Mail")
(smtpmail-smtp-user . "minhtrannhat@minhtrannhat.com")
(mu4e-compose-signature . "Minh Tran"))
t)
;; ;; email stuffs
;; (add-to-list 'load-path "/usr/local/share/emacs/site-lisp/mu4e")
(setq sendmail-program "/usr/bin/msmtp"
send-mail-function #'smtpmail-send-it
message-sendmail-f-is-evil t
message-sendmail-extra-arguments '("--read-envelope-from")
message-send-mail-function #'message-send-mail-with-sendmail)
;; ;; Each path is relative to the path of the maildir you passed to mu
;; (set-email-account! "minhtrannhat.com"
;; '((mu4e-sent-folder . "/minhtrannhat@minhtrannhat.com/Sent")
;; (mu4e-drafts-folder . "/minhtrannhat@minhtrannhat.com/Drafts")
;; (mu4e-trash-folder . "/minhtrannhat@minhtrannhat.com/Trash")
;; (mu4e-refile-folder . "/minhtrannhat@minhtrannhat.com/All Mail")
;; (smtpmail-smtp-user . "minhtrannhat@minhtrannhat.com")
;; (mu4e-compose-signature . "Minh Tran"))
;; t)
;; (setq sendmail-program "/usr/bin/msmtp"
;; send-mail-function #'smtpmail-send-it
;; message-sendmail-f-is-evil t
;; message-sendmail-extra-arguments '("--read-envelope-from")
;; message-send-mail-function #'message-send-mail-with-sendmail)
(use-package org-recur
:hook ((org-mode . org-recur-mode)
(org-agenda-mode . org-recur-agenda-mode))
:demand t
:config
(define-key org-recur-mode-map (kbd "C-c d") 'org-recur-finish)
;; Rebind the 'd' key in org-agenda (default: `org-agenda-day-view').
(define-key org-recur-agenda-mode-map (kbd "d") 'org-recur-finish)
(define-key org-recur-agenda-mode-map (kbd "C-c d") 'org-recur-finish)
(setq org-recur-finish-done t
org-recur-finish-archive t))
;; Refresh org-agenda after rescheduling a task.
(defun org-agenda-refresh ()
"Refresh all `org-agenda' buffers."
(dolist (buffer (buffer-list))
(with-current-buffer buffer
(when (derived-mode-p 'org-agenda-mode)
(org-agenda-maybe-redo)))))
(defadvice org-schedule (after refresh-agenda activate)
"Refresh org-agenda."
(org-agenda-refresh))
(setq org-read-date-prefer-future 'time)

2
doom-emacs/.doom.d/custom.el
View File

@@ -7,7 +7,7 @@
'(git-gutter:update-interval 0.02)
'(smtpmail-smtp-server "mail.minhtrannhat.com")
'(smtpmail-smtp-service 587)
'(warning-suppress-types '((org-element-cache))))
'(warning-suppress-types '(((yasnippet zombie)) (defvaralias) (org-element-cache))))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.

12
doom-emacs/.doom.d/init.el
View File

@@ -10,6 +10,12 @@
;;
;; Alternatively, press 'gd' (or 'C-c c d') on a module to browse its
;; directory (for easy access to its source code).
;; Doom no longer native compile ahead of time so we have to hack around this smh
(setq native-comp-deferred-compilation nil)
(after! (doom-packages straight)
(setq straight--native-comp-available t))
(doom! :input
;;chinese
;;japanese
@@ -126,7 +132,7 @@
;;idris ; a language you can depend on
(json +lsp) ; At least it ain't XML
(java +lsp) ; the poster child for carpal tunnel syndrome
(javascript +lsp) ; all(hope(abandon(ye(who(enter(here))))))
(javascript +lsp +tree-sitter) ; all(hope(abandon(ye(who(enter(here))))))
(julia +lsp) ; a better, faster MATLAB
;;kotlin ; a better, slicker Java(Script)
latex ; writing papers in Emacs has never been so fun
@@ -151,7 +157,7 @@
;;(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
(rust +lsp) ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
scala ; java, but good
(scheme +guile +mit +racket) ; a fully conniving family of lisps
;;(scheme +guile +mit +racket) ; a fully conniving family of lisps
(sh +fish) ; she sells {ba,z,fi}sh shells on the C xor
;;sml
;;solidity ; do you need a blockchain? No.
@@ -161,7 +167,7 @@
yaml ; JSON, but readable
zig ; C, but simpler
:email
(mu4e)
;; (mu4e)
;;notmuch
;;(wanderlust +gmail)
:app

3
doom-emacs/.doom.d/packages.el
View File

@@ -55,4 +55,7 @@
(package! magit-delta)
(package! blamer :recipe (:host github :repo "artawower/blamer.el"))
(package! org-fragtog)
;(package! org-contacts :recipe (:host nil :type git :repo "https://repo.or.cz/org-contacts.git"))
(package! org-recur)
(package! emidje)
(unpin! rustic)