diff options
| -rw-r--r-- | src/guile/skribilo/engine/info.scm | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/src/guile/skribilo/engine/info.scm b/src/guile/skribilo/engine/info.scm index 264b491..fa4fe5c 100644 --- a/src/guile/skribilo/engine/info.scm +++ b/src/guile/skribilo/engine/info.scm @@ -415,14 +415,12 @@ :action (lambda (n e) (let ((url (markup-option n :url)) (text (markup-option n :text))) - (if text - (begin - (output-justified "*Note ") - (output text e) - (output-justified " ("))) - (output url e) - (if text (output-justified ")")) - (output-justified ":: ")))) + (and text + (begin + (output text e) + (output-justified " ("))) + (output-justified url) + (and text (output-justified ")"))))) ;*---------------------------------------------------------------------*/ ;* info-chapter-ref ... */ |