From 31d6cd3e1d25dac8853b029041e890b4b09cd50c Mon Sep 17 00:00:00 2001
From: Ludovic Courtès
Date: Thu, 5 May 2022 22:24:08 +0200
Subject: lncs: Change writers for the LaTeX engine only.

* src/guile/skribilo/package/lncs.scm (&bib-entry-author)
(&bib-entry-booktitle, &bib-entry-journal): Add missing LATEX
argument to 'markup-writer'.
---
 src/guile/skribilo/package/lncs.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src')

diff --git a/src/guile/skribilo/package/lncs.scm b/src/guile/skribilo/package/lncs.scm
index bf6b7cb..4b5de02 100644
--- a/src/guile/skribilo/package/lncs.scm
+++ b/src/guile/skribilo/package/lncs.scm
@@ -330,7 +330,7 @@
          :after "\n%\n")
 
       ;; Abbreviate author first names like this: "Stallman, R.".
-      (markup-writer '&bib-entry-author
+      (markup-writer '&bib-entry-author latex
          :action (lambda (n e)
                    (let ((names (markup-body n)))
                      (evaluate-document
@@ -342,12 +342,12 @@
                       e))))
 
       ;; Journal and book titles must not be italicized.
-      (markup-writer '&bib-entry-booktitle
+      (markup-writer '&bib-entry-booktitle latex
          :action (lambda (n e)
                    (let ((title (markup-body n)))
                      (evaluate-document title e))))
 
-      (markup-writer '&bib-entry-journal
+      (markup-writer '&bib-entry-journal latex
          :action (lambda (n e)
                    (evaluate-document (markup-body n) e))))))
 
-- 
cgit v1.2.3