summary refs log tree commit diff stats
path: root/TODO.org
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