blob: 3c7b0e0a1db25470aef4ca1161f605669b4d2199 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
#+TITLE: TODO stuff for emacs config
#+SUBTITLE: Yes I have one of these…
#+AUTHOR: Case Duckworth
* Packages
** TODO insert-kaomoji
- [ ] Add =( ¬‿¬)═ɜ ɛ═(⌐‿⌐ )= to list
- [ ] and =▬▬▬▬▬▬▬▋ Ò╭╮Ó=
- [ ] Clean up code and package it properly
* Configuring
** TODO Install =el-patch=?
* Productivity
** TODO Set up Org Capture
*** Inspo: From wsinatra
#+begin_src emacs-lisp
;; Custom capture templates
(setq org-capture-templates
'(("t" "Todo" entry (file org-default-notes-file)
"* TODO %?\n%u\n%a\n" :clock-in t :clock-resume t)
("e" "Event" entry (file org-default-notes-file)
"* EVENT %? :EVENT:\n%t" :clock-in t :clock-resume t)
("i" "Idea" entry (file org-default-notes-file)
"* %? :IDEA: \n%t" :clock-in t :clock-resume t)
("p" "Project" entry (file org-default-notes-file)
"* PROJ %?\n%u\n%a\n" :clock-in t :clock-resume t)
("n" "Next Task" entry (file+headline
org-default-notes-file "Tasks")
"** NEXT %? \nDEADLINE: %t")))
#+end_src
*** Also cf. [[https://blog.jethro.dev/posts/org_mode_workflow_preview/][Org-mode Workflow: A Preview · Jethro Kuan]]
* Random shit
** A way to map over buffers
#+begin_src emacs-lisp
(dolist (buf (mapcan (lambda (buf)
(with-current-buffer buf
(circe-server-chat-buffers)))
(circe-server-buffers)))
(with-current-buffer buf
;; whatever u wanna do on each buffer goes here
(lui-set-prompt
(concat (propertize (acdw-irc/margin-format (buffer-name)
""
">")
'face 'circe-prompt-face
'read-only t 'intangible t
'cursor-intangible t)
" "))
(setq-local fringes-outside-margins t
right-margin-width 5
scroll-margin 0
word-wrap t
wrap-prefix (repeat-string
acdw-irc/left-margin " ")
line-number-mode nil)))
#+end_src
|