config.el 4.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131
  1. ;;; ~/.config/doom/config.el -*- lexical-binding: t; -*-
  2. ;; (defvar xdg-data (getenv "XDG_DATA_HOME"))
  3. ;; (defvar xdg-bin (getenv "XDG_BIN_HOME"))
  4. ;; (defvar xdg-cache (getenv "XDG_CACHE_HOME"))
  5. ;; (defvar xdg-config (getenv "XDG_CONFIG_HOME"))
  6. (add-to-list 'default-frame-alist '(inhibit-double-buffering . t))
  7. (setq-default
  8. user-full-name "Colin Powell"
  9. user-mail-address "colin@onec.me"
  10. +workspaces-switch-project-function #'ignore
  11. +pretty-code-enabled-modes '(emacs-lisp-mode org-mode)
  12. +format-on-save-enabled-modes '(not emacs-lisp-mode)
  13. )
  14. ;; (setq-hook! 'minibuffer-setup-hook show-trailing-whitespace nil)
  15. (setq ns-use-thin-smoothing t)
  16. (add-to-list 'default-frame-alist '(ns-transparent-titlebar . t))
  17. (add-to-list 'default-frame-alist '(ns-appearance . dark))
  18. ;(add-hook 'window-setup-hook 'toggle-frame-maximized)
  19. ;; Keybindings
  20. (map!
  21. ;; Easier window navigation
  22. :n "C-h" #'evil-window-left
  23. :n "C-j" #'evil-window-down
  24. :n "C-k" #'evil-window-up
  25. :n "C-l" #'evil-window-right
  26. (:after treemacs-evil
  27. (:map evil-treemacs-state-map
  28. "C-h" #'evil-window-left
  29. "C-l" #'evil-window-right))
  30. ;; some handy alt shortcuts
  31. :n "s-g" #'magit-status
  32. :n "s-c" #'org-capture
  33. ;; Let's be like our friends Slack and Discord
  34. :n "s-p" #'+ivy/project-search
  35. :n "s-k" #'counsel-recentf
  36. ;; Leader tricks
  37. (:leader
  38. (:prefix "f"
  39. :desc "Find file in dotfiles" :n "t" #'+hlissner/find-in-dotfiles
  40. :desc "Browse dotfiles" :n "T" #'+hlissner/browse-dotfiles)
  41. (:prefix "t"
  42. :desc "Toggle visual line mode" :n "v" #'visual-line-mode
  43. :desc "Toggle auto fill mode" :n "a" #'auto-fill-mode
  44. :desc "Switch themes" :n "t" #'counsel-load-theme)
  45. (:prefix "o"
  46. :desc "Elfeed feed reader" :n "f" #'elfeed)
  47. (:prefix "p"
  48. :desc "Black buffer" :n "b" #'blacken-buffer)
  49. (:prefix "y"
  50. :desc "Yank pop!" :n "p" #'counsel-yank-pop
  51. :desc "Git yank link" :n "g" #'git-link)
  52. (:prefix "n"
  53. :desc "Browse mode notes" :n "m" #'+hlissner/find-notes-for-major-mode
  54. :desc "Browse project notes" :n "p" #'+hlissner/find-notes-for-project)))
  55. ;; Company mode
  56. (require 'company)
  57. (setq company-idle-delay 0.2
  58. completion-ignore-case t
  59. company-minimum-prefix-length 3
  60. company-async-timeout 2)
  61. ;;(set! :company-backend 'python-mode '(company-anaconda))
  62. (add-hook 'prog-mode-hook 'global-company-mode)
  63. ;; importmagic
  64. (add-hook 'python-mode-hook 'importmagic-mode)
  65. ;; Golang
  66. (add-hook 'go-mode-hook 'gofmt-before-save)
  67. ;; app/rss
  68. (add-hook! 'elfeed-show-mode-hook (text-scale-set 1.5))
  69. ;; emacs/eshell
  70. (after! eshell
  71. (set-eshell-alias!
  72. "f" "find-file $1"
  73. "l" "ls -lh"
  74. "d" "dired $1"
  75. "dc" "docker-compose $1"
  76. "gl" "(call-interactively 'magit-log-current)"
  77. "gs" "magit-status"
  78. "gc" "magit-commit"
  79. "rg" "rg --color=always $*"))
  80. ;; Add notice for lines over 88 chars
  81. ;;(setq-default
  82. ;; whitespace-line-column 88
  83. ;; whitespace-style '(face lines-tail))
  84. ;; tools/magit
  85. (setq magit-repository-directories '(("~/devel" . 2))
  86. magit-save-repository-buffers nil)
  87. ;; make the lines in the buffer wrap around the edges of the screen.
  88. ;(add-hook 'org-mode-hook '(lambda () (visual-line-mode)))
  89. ;;; Setup sending email with msmtp
  90. (setq send-mail-function 'sendmail-send-it
  91. sendmail-program "/usr/local/bin/msmtp"
  92. mail-specify-envelope-from t
  93. message-sendmail-envelope-from 'header
  94. mail-envelope-from 'header)
  95. ;; enable ivy buffer icons
  96. (setq ivy-buffer-icons t)
  97. ;; Hide hidden files in treemacs
  98. (setq treemacs-show-hidden-files nil)
  99. ;;(load! "+org-daypage") ;; hardwire this baby in here somewhere
  100. (load! "+ui") ;; My ui mods. Also contains ligature stuff.
  101. (load! "+music") ;; Music stuff, visible through SPC-a-m. Not perfect.
  102. (load! "+ranger") ;; File manager stuff
  103. ;;(load! "+reason") ;; ReasonML stuff
  104. (load! "+mail") ;; Mail stuff
  105. (load! "+org") ;; Org mode stuff like todos and rebindings
  106. (load! "+org-gcal") ;; Org mode stuff like todos and rebindings
  107. (load! "+wttrin") ;; Weather config