From b09b035d86267aa363430f5ff8b5900b37c15ea8 Mon Sep 17 00:00:00 2001
From: Ludovic Court`es
Date: Wed, 1 Mar 2006 17:25:24 +0000
Subject: Various fixes in the documentation code.

* doc/skr/manual.skr: Fixed uses of `format'.

* doc/user/document.skb (dummy-document-output): Fixed handling of
  non-list author.

* doc/user/src/api2.skb: Fixed the title.  ;-)

* doc/user/src/bib1.sbib (bigloo): Added a year and author as expected by
  `bib5.skb'.

* doc/user/user.skb (Introduction): Explicitly added `:file #f'.

git-archimport-id: lcourtes@laas.fr--2004-libre/skribilo--devel--1.2--patch-61
---
 doc/skr/manual.skr | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'doc/skr/manual.skr')

diff --git a/doc/skr/manual.skr b/doc/skr/manual.skr
index e6b7d64..f8b022c 100644
--- a/doc/skr/manual.skr
+++ b/doc/skr/manual.skr
@@ -22,7 +22,8 @@
 		    (skribe-eval (mark ident) e)
 		    (skribe-eval (center
 				  (markup-body n)
-				  (if number (bold (format "Ex. ~a: " number)))
+				  (if number
+				      (bold (format #f "Ex. ~a: " number)))
 				  legend)
 				 e)))))
 
@@ -279,7 +280,7 @@
 ;*---------------------------------------------------------------------*/
 (define-markup (compiler-options bin)
    (skribe-message "  [executing: ~a --options]\n" bin)
-   (let ((port (open-input-file (format "| ~a --options" bin))))
+   (let ((port (open-input-file (format #f "| ~a --options" bin))))
       (let ((opts (read port)))
 	 (close-input-port port)
 	 (apply description (map (lambda (opt) (item :key (bold (car opt))
-- 
cgit v1.2.3