phundrak/config.phundrak.com
1
0
Fork 0
Code Issues Pull Requests Actions Activity

Reorganized and renamed some elements in org capture settings

Browse Source
This commit is contained in:
Lucien Cartier-Tilet 2020-07-16 14:29:58 +02:00
parent f1b242faca
commit f5ee3b5c03
Signed by: phundrak
GPG Key ID: BD7789E705CB8DCA
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
org/config/spacemacs.org
View File

@ -2650,8 +2650,8 @@
| th | Health | | file+headline | org-private-agenda-file | health.orgcaptmpl | | th | Health | | file+headline | org-private-agenda-file | health.orgcaptmpl |
| ti | Informatique | | file+headline | org-private-agenda-file | informatique.orgcaptmpl | | ti | Informatique | | file+headline | org-private-agenda-file | informatique.orgcaptmpl |
| w | Worldbuilding | | | | | | w | Worldbuilding | | | | |
| wn | Note | | file+headline | org-worldbuilding-file | notes.orgcaptmpl | | wn | Note | | file+headline | org-wordbuilding-file | notes.orgcaptmpl |
| wr | Resource | | file+headline | org-worldbuilding-file | resource.orgcaptmpl | | wr | Resource | | file+headline | org-wordbuilding-file | resource.orgcaptmpl |
The following code snipped is not tangled into my configuration file, but The following code snipped is not tangled into my configuration file, but
instead creates the equivalent to the table above into EmacsLisp code found instead creates the equivalent to the table above into EmacsLisp code found
@ -2659,12 +2659,12 @@
#+NAME: org-capture-shortcut-gen #+NAME: org-capture-shortcut-gen
#+BEGIN_SRC emacs-lisp :tangle no :noweb yes :var table=org-capture-shortcuts-table :exports code :cache yes :results replace #+BEGIN_SRC emacs-lisp :tangle no :noweb yes :var table=org-capture-shortcuts-table :exports code :cache yes :results replace
(mapconcat (lambda (entry) (mapconcat (lambda (entry)
(let ((shortcut (nth 0 entry)) (let* ((shortcut (nth 0 entry))
(name (nth 1 entry)) (name (nth 1 entry))
(title (nth 2 entry)) (title (nth 2 entry))
(insertmode (nth 3 entry)) (insertmode (nth 3 entry))
(fileinsert (nth 4 entry)) (fileinsert (nth 4 entry))
(sourceorg (nth 5 entry))) (sourceorg (nth 5 entry)))
(if (string= "" insertmode) (if (string= "" insertmode)
(format "(\"%s\" \"%s\")" shortcut name) (format "(\"%s\" \"%s\")" shortcut name)
(concat (format "(\"%s\" \"%s\" entry\n" shortcut name) (concat (format "(\"%s\" \"%s\" entry\n" shortcut name)
@ -2675,7 +2675,7 @@
table "\n") table "\n")
#+END_SRC #+END_SRC
#+RESULTS[2fcaa1f6411ca2238adb5f9bbe32d21e628f6798]: org-capture-shortcut-gen #+RESULTS[c9888f3d14a3b5cd83d9626093d5b28806f6d8d2]: org-capture-shortcut-gen
#+begin_example #+begin_example
("c" "Conlanging") ("c" "Conlanging")
("cn" "Note" entry ("cn" "Note" entry
@ -2712,7 +2712,7 @@
("re" "Emacs" entry ("re" "Emacs" entry
(file+headline org-default-notes-file "Emacs") (file+headline org-default-notes-file "Emacs")
(file "~/org/capture/resource.orgcaptmpl")) (file "~/org/capture/resource.orgcaptmpl"))
("ri" "Informatique Général" entry ("ri" "Informatique" entry
(file+headline org-default-notes-file "Informatique") (file+headline org-default-notes-file "Informatique")
(file "~/org/capture/resource.orgcaptmpl")) (file "~/org/capture/resource.orgcaptmpl"))
("rl" "Linguistics" entry ("rl" "Linguistics" entry
@ -2733,10 +2733,10 @@
(file "~/org/capture/informatique.orgcaptmpl")) (file "~/org/capture/informatique.orgcaptmpl"))
("w" "Worldbuilding") ("w" "Worldbuilding")
("wn" "Note" entry ("wn" "Note" entry
(file+headline org-worldbuilding-file "Note") (file+headline \"~/org/worldbuilding.org\" "Note")
(file "~/org/capture/notes.orgcaptmpl")) (file "~/org/capture/notes.orgcaptmpl"))
("wr" "Resource" entry ("wr" "Resource" entry
(file+headline org-worldbuilding-file "Resource") (file+headline \"~/org/worldbuilding.org\" "Resource")
(file "~/org/capture/resource.orgcaptmpl")) (file "~/org/capture/resource.orgcaptmpl"))
#+end_example #+end_example