summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfpi2020-02-13 16:11:37 +0100
committerfpi2020-02-23 18:07:14 +0100
commit4939f9705b0d9f8d701363f4748e2fe8b212b95e (patch)
tree03fc18d8f7cabc62c112f6bd7f438409bb4e784c
parentNicer separator (─) for block agendas (diff)
Add a capture template for bibtex entries
Diffstat (limited to '')
-rw-r--r--emacs-init.org33
1 files changed, 33 insertions, 0 deletions
diff --git a/emacs-init.org b/emacs-init.org
index 8558334..fd0900b 100644
--- a/emacs-init.org
+++ b/emacs-init.org
@@ -1861,6 +1861,10 @@ Templates
:END:
"
)
+ ("b" "Bibtex entry"
+ entry
+ (id "efc97963-b714-4020-94b6-c23ad2a286ee")
+ (function fpi/add-org-from-doi))
;; ("a" "Appointment" entry (file "~/sync/a.org")
;; "* %i%?%(and (org-id-get-create) nil)\n:PROPERTIES:\n:CREATED: %U%(when %a \"\n:SOURCE: %a\")\n:END:\n%^t")
;; ("t" "Soonish task" entry (file "~/sync/refile.org")
@@ -1979,6 +1983,35 @@ A small function to toggle the encryption state of the current entry.
(org-ref-default-bibliography '("~/s/ma/ma.bib"))
(org-ref-pdf-directory "~/s/ma/lit/"))
#+end_src
+I store my bibtex references in an org file together with my notes. In
+addition to saving the meta information in properties using the same
+functions as =doi-utils-doi-to-org-bibtex=, I also store them a second
+time in a bibtex src block in the heading. The src blocks are tangled
+to compile into a separate =.bib= file. The function below creates new
+entries from a given doi and is called in my respective capture
+template.
+#+begin_src emacs-lisp
+(defun fpi/add-org-from-doi (&optional doi)
+ "Get bibtex entry from doi and format as Org header with
+properties and additional bibtex src block. Also downloads the
+pdf if available."
+ (let* ((doi (or doi (read-string "Enter doi: ")))
+ (content (replace-regexp-in-string "\n$" "" (doi-utils-doi-to-bibtex-string doi)))
+ (cleaned (with-temp-buffer
+ (insert content)
+ (org-ref-clean-bibtex-entry)
+ (org-bibtex-read)
+ (buffer-substring (point-min) (point-max)))))
+ (with-temp-buffer
+ (org-mode)
+ (org-bibtex-write)
+ (goto-char (point-max))
+ (insert "#+BEGIN_SRC bibtex\n")
+ (insert cleaned)
+ (insert "\n#+END_SRC\n")
+ (org-demote)
+ (buffer-substring (point-min) (point-max)))))
+#+end_src
*** Todo settings
- WAITING tasks are waiting on the completion of other tasks
- NEXT tasks can be picked up