From 6c6ac6922d4fb4dfec9fa58dcb9e9023db09a72c Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sat, 2 Dec 2023 00:17:53 +0000
Subject: html: Output address only when it is a list.

* src/guile/skribilo/engine/html.scm (author): Output address only
when it is a list.
---
 src/guile/skribilo/engine/html.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/guile/skribilo/engine/html.scm b/src/guile/skribilo/engine/html.scm
index 96b5565..b00b93c 100644
--- a/src/guile/skribilo/engine/html.scm
+++ b/src/guile/skribilo/engine/html.scm
@@ -1083,8 +1083,10 @@ ignored, return #f."
 	       (when title (row title))
 	       ;; affiliation
 	       (when affiliation (row affiliation))
-	       ;; address
-	       (when address (for-each row address))
+	       ;; Output address only if it is a list. address could
+	       ;; be a markup object.
+	       (when (list? address)
+                 (for-each row address))
 	       ;; telephone
 	       (when phone (row phone))
 	       ;; email
-- 
cgit v1.2.3