From 88f8bb7bc8726c20f3cdd4e8d47d1b487b1c2cd7 Mon Sep 17 00:00:00 2001 From: TEC Date: Tue, 5 Oct 2021 22:36:13 +0800 Subject: [PATCH] oc-csl: Support bare author citations * lisp/oc-csl.el (org-cite-csl--create-structure-params): Add support for bare (b), bare-caps (bc), bare-full (bf), and bare-caps-full (bcf) author citation styles. --- lisp/oc-csl.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/oc-csl.el b/lisp/oc-csl.el index 3d1388075..3d8f8ed03 100644 --- a/lisp/oc-csl.el +++ b/lisp/oc-csl.el @@ -300,9 +300,13 @@ (defun org-cite-csl--create-structure-params (citation info) ;; "author" style. (`(,(or "author" "a") . ,variant) (pcase variant + ((or "bare" "b") '(:mode author-only :suppress-affixes t)) ((or "caps" "c") '(:mode author-only :capitalize-first t)) ((or "full" "f") '(:mode author-only :ignore-et-al t)) + ((or "bare-caps" "bc") '(:mode author-only :suppress-affixes t :capitalize-first t)) + ((or "bare-full" "bf") '(:mode author-only :suppress-affixes t :ignore-et-al t)) ((or "caps-full" "cf") '(:mode author-only :capitalize-first t :ignore-et-al t)) + ((or "bare-caps-full" "bcf") '(:mode author-only :suppress-affixes t :capitalize-first t :ignore-et-al t)) (_ '(:mode author-only)))) ;; "noauthor" style. (`(,(or "noauthor" "na") . ,variant) -- 2.33.0