Reorganized and renamed some elements in org capture settings

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

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