emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org 26a2811b06: org-cite-basic-export-bibliography: Ski


From: ELPA Syncer
Subject: [elpa] externals/org 26a2811b06: org-cite-basic-export-bibliography: Skip missing bibliography keys
Date: Sun, 6 Nov 2022 02:57:58 -0500 (EST)

branch: externals/org
commit 26a2811b06a5916a66d101b10238552db12ff6e7
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    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.
---
 lisp/oc-basic.el | 20 +++++++++++---------
 1 file changed, 11 insertions(+), 9 deletions(-)

diff --git a/lisp/oc-basic.el b/lisp/oc-basic.el
index f1b7c8263c..3ef7a37e3b 100644
--- a/lisp/oc-basic.el
+++ b/lisp/oc-basic.el
@@ -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
 export state, as a property list."
   (mapconcat
-   (lambda (k)
-     (let ((entry (org-cite-basic--get-entry k info)))
-       (org-export-data
-        (org-cite-make-paragraph
-         (and (org-export-derived-backend-p backend 'latex)
-              (org-export-raw-string "\\noindent\n"))
-         (org-cite-basic--print-entry entry style info))
-        info)))
-   (org-cite-basic--sort-keys keys info)
+   (lambda (entry)
+     (org-export-data
+      (org-cite-make-paragraph
+       (and (org-export-derived-backend-p backend 'latex)
+            (org-export-raw-string "\\noindent\n"))
+       (org-cite-basic--print-entry entry style info))
+      info))
+   (delq nil
+         (mapcar
+          (lambda (k) (org-cite-basic--get-entry k info))
+          (org-cite-basic--sort-keys keys info)))
    "\n"))
 
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]