mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-12 21:10:10 +00:00
org-cite-basic-export-bibliography: Skip missing bibliography keys
* lisp/oc-basic.el (org-cite-basic-export-bibliography): Ignore citation keys that are not present in bibliography. Previously, an error was thrown.
This commit is contained in:
parent
eefb14f9fa
commit
26a2811b06
|
@ -713,15 +713,17 @@ KEYS is the list of cited keys, as strings. STYLE is the expected bibliography
|
||||||
style, as a string. BACKEND is the export back-end, as a symbol. INFO is the
|
style, as a string. BACKEND is the export back-end, as a symbol. INFO is the
|
||||||
export state, as a property list."
|
export state, as a property list."
|
||||||
(mapconcat
|
(mapconcat
|
||||||
(lambda (k)
|
(lambda (entry)
|
||||||
(let ((entry (org-cite-basic--get-entry k info)))
|
(org-export-data
|
||||||
(org-export-data
|
(org-cite-make-paragraph
|
||||||
(org-cite-make-paragraph
|
(and (org-export-derived-backend-p backend 'latex)
|
||||||
(and (org-export-derived-backend-p backend 'latex)
|
(org-export-raw-string "\\noindent\n"))
|
||||||
(org-export-raw-string "\\noindent\n"))
|
(org-cite-basic--print-entry entry style info))
|
||||||
(org-cite-basic--print-entry entry style info))
|
info))
|
||||||
info)))
|
(delq nil
|
||||||
(org-cite-basic--sort-keys keys info)
|
(mapcar
|
||||||
|
(lambda (k) (org-cite-basic--get-entry k info))
|
||||||
|
(org-cite-basic--sort-keys keys info)))
|
||||||
"\n"))
|
"\n"))
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue