diff options
-rw-r--r-- | config.org | 137 |
1 files changed, 91 insertions, 46 deletions
diff --git a/config.org b/config.org index 703c1c8..1404afc 100644 --- a/config.org +++ b/config.org | |||
@@ -75,6 +75,7 @@ It's highly likely that the WTFPL is completely incompatible with the GPL, for w | |||
75 | (when (equal (buffer-file-name) | 75 | (when (equal (buffer-file-name) |
76 | (expand-file-name | 76 | (expand-file-name |
77 | (concat user-emacs-directory "config.org"))) | 77 | (concat user-emacs-directory "config.org"))) |
78 | ;; Tangle and load init.el and early-init.el | ||
78 | (require 'async) | 79 | (require 'async) |
79 | (async-start | 80 | (async-start |
80 | (lambda () | 81 | (lambda () |
@@ -292,6 +293,17 @@ I also want to switch themes between night and day. | |||
292 | (rm/whitelist-add "^$")) | 293 | (rm/whitelist-add "^$")) |
293 | #+end_src | 294 | #+end_src |
294 | 295 | ||
296 | ** Minibuffer | ||
297 | |||
298 | *** Keep cursor from going into the prompt | ||
299 | |||
300 | from [[http://ergoemacs.org/emacs/emacs_stop_cursor_enter_prompt.html][Ergo Emacs]]. | ||
301 | |||
302 | #+begin_src emacs-lisp | ||
303 | (cuss minibuffer-prompt-properties | ||
304 | '(read-only t cursor-intangible t face minibuffer-prompt)) | ||
305 | #+end_src | ||
306 | |||
295 | ** Show =^L= as a line | 307 | ** Show =^L= as a line |
296 | 308 | ||
297 | #+begin_src emacs-lisp | 309 | #+begin_src emacs-lisp |
@@ -974,50 +986,6 @@ from [[https://github.com/alphapapa/unpackaged.el#org-return-dwim][unpackaged.el | |||
974 | (add-hook 'prog-mode-hook #'acdw/enable-line-numbers) | 986 | (add-hook 'prog-mode-hook #'acdw/enable-line-numbers) |
975 | #+end_src | 987 | #+end_src |
976 | 988 | ||
977 | ** Git | ||
978 | |||
979 | #+begin_src emacs-lisp | ||
980 | (use-package magit | ||
981 | :bind | ||
982 | ("C-x g" . magit-status) | ||
983 | :custom-update | ||
984 | (magit-no-confirm '(stage-all-changes))) | ||
985 | #+end_src | ||
986 | |||
987 | *** Hook into =prescient= | ||
988 | |||
989 | #+begin_src emacs-lisp | ||
990 | (define-advice magit-list-refs | ||
991 | (:around (orig &optional namespaces format sortby) | ||
992 | prescient-sort) | ||
993 | "Apply prescient sorting when listing refs." | ||
994 | (let ((res (funcall orig namespaces format sortby))) | ||
995 | (if (or sortby | ||
996 | magit-list-refs-sortby | ||
997 | (not selectrum-should-sort-p)) | ||
998 | res | ||
999 | (prescient-sort res)))) | ||
1000 | #+end_src | ||
1001 | |||
1002 | *** Use =libgit= when I can build it (requires =cmake=) | ||
1003 | |||
1004 | #+begin_src emacs-lisp | ||
1005 | (when (executable-find "cmake") | ||
1006 | (use-package libgit) | ||
1007 | (use-package magit-libgit)) | ||
1008 | #+end_src | ||
1009 | |||
1010 | *** Git "forge" capabilities | ||
1011 | |||
1012 | #+begin_src emacs-lisp | ||
1013 | (use-package forge | ||
1014 | :after magit | ||
1015 | :unless (eq system-type 'windows-nt) | ||
1016 | :custom | ||
1017 | (forge-owned-accounts | ||
1018 | '(("duckwork")))) | ||
1019 | #+end_src | ||
1020 | |||
1021 | ** Programming languages | 989 | ** Programming languages |
1022 | 990 | ||
1023 | *** Fish shell | 991 | *** Fish shell |
@@ -1073,11 +1041,88 @@ from [[https://github.com/alphapapa/unpackaged.el#org-return-dwim][unpackaged.el | |||
1073 | 1041 | ||
1074 | #+begin_src emacs-lisp | 1042 | #+begin_src emacs-lisp |
1075 | (use-package go-mode | 1043 | (use-package go-mode |
1076 | :mode "\\.go\\'") | 1044 | :mode "\\.go\\'" |
1045 | :hook | ||
1046 | (before-save . gofmt-before-save)) | ||
1077 | #+end_src | 1047 | #+end_src |
1078 | 1048 | ||
1079 | * Applications | 1049 | * Applications |
1080 | 1050 | ||
1051 | ** Git | ||
1052 | |||
1053 | #+begin_src emacs-lisp | ||
1054 | (use-package magit | ||
1055 | :bind | ||
1056 | ("C-x g" . magit-status) | ||
1057 | :custom-update | ||
1058 | (magit-no-confirm '(stage-all-changes))) | ||
1059 | #+end_src | ||
1060 | |||
1061 | *** Hook into =prescient= | ||
1062 | |||
1063 | #+begin_src emacs-lisp | ||
1064 | (define-advice magit-list-refs | ||
1065 | (:around (orig &optional namespaces format sortby) | ||
1066 | prescient-sort) | ||
1067 | "Apply prescient sorting when listing refs." | ||
1068 | (let ((res (funcall orig namespaces format sortby))) | ||
1069 | (if (or sortby | ||
1070 | magit-list-refs-sortby | ||
1071 | (not selectrum-should-sort-p)) | ||
1072 | res | ||
1073 | (prescient-sort res)))) | ||
1074 | #+end_src | ||
1075 | |||
1076 | *** Use =libgit= when I can build it (requires =cmake=) | ||
1077 | |||
1078 | #+begin_src emacs-lisp | ||
1079 | (when (executable-find "cmake") | ||
1080 | (use-package libgit) | ||
1081 | (use-package magit-libgit)) | ||
1082 | #+end_src | ||
1083 | |||
1084 | *** Git "forge" capabilities | ||
1085 | |||
1086 | #+begin_src emacs-lisp | ||
1087 | (use-package forge | ||
1088 | :after magit | ||
1089 | :unless (eq system-type 'windows-nt) | ||
1090 | :custom | ||
1091 | (forge-owned-accounts | ||
1092 | '(("duckwork")))) | ||
1093 | #+end_src | ||
1094 | |||
1095 | |||
1096 | ** Dired | ||
1097 | |||
1098 | #+begin_src emacs-lisp | ||
1099 | (cuss dired-dwim-target t) | ||
1100 | (cuss dired-listing-switches "-alDh") | ||
1101 | |||
1102 | (cuss wdired-allow-to-change-permissions t) | ||
1103 | (bind-key "C-c w" #'wdired-change-to-wdired-mode dired-mode-map) | ||
1104 | #+end_src | ||
1105 | |||
1106 | ** Proced | ||
1107 | |||
1108 | #+begin_src emacs-lisp | ||
1109 | (defun acdw/setup-proced () | ||
1110 | (variable-pitch-mode -1) | ||
1111 | (toggle-truncate-lines 1) | ||
1112 | (proced-toggle-auto-update 1)) | ||
1113 | |||
1114 | (add-hook 'proced-mode-hook #'acdw/setup-proced) | ||
1115 | #+end_src | ||
1116 | |||
1117 | ** ... Ed | ||
1118 | |||
1119 | #+begin_src emacs-lisp | ||
1120 | (use-package ed | ||
1121 | :straight (ed-mode | ||
1122 | :host github | ||
1123 | :repo "ryanprior/ed-mode")) | ||
1124 | #+end_src | ||
1125 | |||
1081 | ** Elpher | 1126 | ** Elpher |
1082 | 1127 | ||
1083 | #+BEGIN_SRC emacs-lisp | 1128 | #+BEGIN_SRC emacs-lisp |
@@ -1145,7 +1190,7 @@ from [[https://github.com/alphapapa/unpackaged.el#org-return-dwim][unpackaged.el | |||
1145 | (0x0-default-service 'ttm)) | 1190 | (0x0-default-service 'ttm)) |
1146 | #+END_SRC | 1191 | #+END_SRC |
1147 | 1192 | ||
1148 | ** EMMS | 1193 | ** Bongo |
1149 | 1194 | ||
1150 | #+BEGIN_SRC emacs-lisp | 1195 | #+BEGIN_SRC emacs-lisp |
1151 | (use-package bongo | 1196 | (use-package bongo |