BibTeX writer: ensure that "literal" names are enclosed in braces.

Closes #9987.
jgm · Jul 15, 2024 · 8613aa3 · 8613aa3
1 parent 790abcf
commit 8613aa3
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 1 deletion.
diff --git a/src/Text/Pandoc/Citeproc/BibTeX.hs b/src/Text/Pandoc/Citeproc/BibTeX.hs
@@ -206,7 +206,7 @@ writeBibtexString opts variant mblang ref =
 
   renderName name =
     case nameLiteral name of
-      Just t  -> B.text t
+      Just t  -> B.spanWith ("",[],[]) $ B.text t
       Nothing -> spacedMaybes
                   [ nameNonDroppingParticle name
                   , nameFamily name

diff --git a/test/command/9987.md b/test/command/9987.md
@@ -0,0 +1,10 @@
+```
+% pandoc -f bibtex -t bibtex
+@misc{agency,
+  author = {{European Environment Agency}},
+}
+^D
+@misc{agency,
+  author = {{European Environment Agency}}
+}
+```