1 files changed, 35 insertions, 57 deletions

@@ -99,36 +99,25 @@ e.g., “A gold watch” title-cases to “A gold Watch”
 *** 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
+  ;; 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]]
 
 * Buffer display stuff
 
 #+begin_src emacs-lisp
-  ;; from alphapapa
-  (cl-defun ap/display-buffer-in-side-window (&optional (buffer (current-buffer)))
-    "Display BUFFER in dedicated side window."
-    (interactive)
-    (let ((display-buffer-mark-dedicated t))
-      (display-buffer-in-side-window buffer
-                                     '((side . right)
-                                       (window-parameters
-                                        (no-delete-other-windows . t))))))
-#+end_src
+  ;; from alphapapa (cl-defun ap/display-buffer-in-side-window (&optional
+  (buffer (current-buffer))) "Display BUFFER in dedicated side window."
+  (interactive) (let ((display-buffer-mark-dedicated t))
+  (display-buffer-in-side-window buffer '((side . right) (window-parameters
+  (no-delete-other-windows . t)))))) #+end_src
 
 - [[https://old.reddit.com/r/emacs/comments/pka1sm/my_first_package_aside_for_easier_configuration/][My first package: Aside, for easier configuration and use of side windows :
   emacs]]
@@ -148,43 +137,30 @@ e.g., “A gold watch” title-cases to “A gold Watch”
 ** 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
+  (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
 
 ** ZNC Connecting (from #systemcrafters)
 
 #+begin_quote
-daviwil | minikN: I connect to the hostname/port of my ZNC server,
-            but the trick is that the username is the nick you want to
-            use on the server and the password is your znc username
-            and password joined with a colon, like daviwil:b4dp4ssw0rd
-   minikN | so you don't specify the network in your password? like
-            user/network:password?
-  benoitj | daviwil: nice password you have there
-  daviwil | minikN: nope, I only have one network anyway
+daviwil | minikN: I connect to the hostname/port of my ZNC server, but the
+            trick is that the username is the nick you want to use on the
+            server and the password is your znc username and password joined
+            with a colon, like daviwil:b4dp4ssw0rd minikN | so you don't
+            specify the network in your password? like user/network:password?
+            benoitj | daviwil: nice password you have there daviwil | minikN:
+            nope, I only have one network anyway
 -    acdw > daviwil: I just see *******
-  benoitj | I use two networks
-#+end_quote
+  benoitj | I use two networks #+end_quote
 
 ** Teach =link-hint= about =lui-buttons=
 
@@ -204,6 +180,8 @@ https://tildegit.org/acdw/emacs/src/branch/main/init.el#L1166, e.g.
 
 - *OR* install this: [[https://github.com/sshaw/git-link][GitHub - sshaw/git-link: Emacs package to get the GitHub/Bitbucket/GitLab/... URL for a buffer location]]
 
-** Fix =acdw-org/count-words-stupidly=
+** DONE Fix =acdw-org/count-words-stupidly=
 
 It adds one for blank lines.
+
+** TODO [[https://stackoverflow.com/questions/25161792/emacs-org-mode-how-can-i-fold-everything-but-the-current-headline][Org mode hide all but current heading]]