Merge pull request #439 from daniron26/patch-1

fix year extraction from date in bibtex-completion-apa-get-value
tmalsburg · Sep 18, 2023 · 9555174 · 9555174
2 parents ef07adf + f410356
commit 9555174
Showing 1 changed file with 5 additions and 3 deletions.
diff --git a/bibtex-completion.el b/bibtex-completion.el
@@ -1219,9 +1219,11 @@ string if FIELD is not present in ENTRY and DEFAULT is nil."
               ;; the journal in its title.
               ("pages" (s-join "–" (s-split "[^0-9]+" value t)))
               ("doi" (s-concat " http://dx.doi.org/" value))
-              ("year" (or value
-                          (car (split-string (bibtex-completion-get-value "date" entry "") "-"))))
-              (_ value))))))
+              ("year" value)
+              (_ value))
+          (pcase field
+            ("year" (car (split-string (bibtex-completion-get-value "date" entry "") "-"))))
+          ))))
    default ""))
 
 (defun bibtex-completion-apa-format-authors (value &optional abbrev)