[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org fdd9b6d330 3/3: org-cite-capitalize: Fix when STR i
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org fdd9b6d330 3/3: org-cite-capitalize: Fix when STR is a raw string pseudo-object |
Date: |
Wed, 6 Dec 2023 09:59:00 -0500 (EST) |
branch: externals/org
commit fdd9b6d330a5ef7c0e95b67f37d0233922c29300
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
org-cite-capitalize: Fix when STR is a raw string pseudo-object
* lisp/oc.el (org-cite-capitalize): Assure that `upcase' is passed a
string.
Link:
https://orgmode.org/list/alpine.DEB.2.22.394.2311290957360.107158@shell3.miskatonic.org
---
lisp/oc.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/oc.el b/lisp/oc.el
index 72e1779e24..1d0d461532 100644
--- a/lisp/oc.el
+++ b/lisp/oc.el
@@ -1241,7 +1241,7 @@ and must return either a string, an object, or a
secondary string."
((stringp str) (capitalize str))
((org-element-type-p str 'raw)
(org-export-raw-string
- (upcase (org-element-contents str))))
+ (upcase (mapconcat #'identity (org-element-contents str) ""))))
(t (error "%S must be either a string or raw string object" str))))