diff options
| -rw-r--r-- | src/guile/skribilo/engine/html.scm | 6 |
1 files changed, 4 insertions, 2 deletions
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 |