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

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

[elpa] externals/org dbcc2e04f9 1/2: Merge branch 'bugfix'


From: ELPA Syncer
Subject: [elpa] externals/org dbcc2e04f9 1/2: Merge branch 'bugfix'
Date: Thu, 23 Jun 2022 09:57:50 -0400 (EDT)

branch: externals/org
commit dbcc2e04f9cdcd8d51a930dad2858a35392646f2
Merge: 7c61a3a801 0dc27a8837
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    Merge branch 'bugfix'
---
 lisp/oc-basic.el | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/lisp/oc-basic.el b/lisp/oc-basic.el
index a937f7513e..f10b95b7f1 100644
--- a/lisp/oc-basic.el
+++ b/lisp/oc-basic.el
@@ -189,7 +189,14 @@ Return a hash table with citation references as keys and 
fields alist as values.
                                 (cons 'year
                                       (cond
                                        ((consp date)
-                                        (caar date))
+                                         (let ((year (caar date)))
+                                           (cond
+                                             ((numberp year) (number-to-string 
year))
+                                             ((stringp year) year)
+                                             (t
+                                               (error
+                                                 "First element of CSL-JSON 
date-parts should be a number or string, got %s: %S"
+                                                 (type-of year) year)))))
                                        ((stringp date)
                                         (replace-regexp-in-string
                                           (rx



reply via email to

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