diff options
| -rw-r--r-- | doc/user/sectioning.skb | 20 | ||||
| -rw-r--r-- | doc/user/src/api4.skb | 2 | ||||
| -rw-r--r-- | doc/user/src/api5.skb | 5 |
3 files changed, 7 insertions, 20 deletions
diff --git a/doc/user/sectioning.skb b/doc/user/sectioning.skb index bea8116..db227d7 100644 --- a/doc/user/sectioning.skb +++ b/doc/user/sectioning.skb @@ -1,7 +1,7 @@ ;;; sectioning.skb -- Sectioning markups ;;; -;;; Copyright 2003, 2004 Manuel Serrano ;;; Copyright 2007 Ludovic Courtès <ludo@gnu.org> +;;; Copyright 2003, 2004 Manuel Serrano ;;; ;;; ;;; This program is free software; you can redistribute it and/or modify @@ -57,7 +57,7 @@ in the main target file.]) :see-also '(document section toc)) (example-produce - (example :legend "The chapter markup" (prgm :file "src/api4.skb")) + (example :legend [The ,(tt [chapter]) markup] (prgm :file "src/api5.skb")) (disp (processor :combinator (lambda (e1 e2) @@ -66,7 +66,7 @@ in the main target file.]) :options '(:title :file :number :toc) :action dummy-section-output) e)) - (include "src/api4.skb"))))) + (include "src/api5.skb"))))) ;*--- section ---------------------------------------------------------*/ (subsection :title "Sections" @@ -88,19 +88,7 @@ file. A value of ,(tt "#f") tells the Skribe compiler to embed the chapter in the main target file.]) (#!rest node... [The nodes of the section.])) :others '(subsection subsubsection) - :see-also '(document chapter paragraph toc)) - -(example-produce - (example :legend "The chapter markup" (prgm :file "src/api5.skb")) - (disp - (processor :combinator - (lambda (e1 e2) - (let ((e (copy-engine 'document-engine e2))) - (markup-writer 'chapter e - :options '(:title :file :number :toc) - :action dummy-section-output) - e)) - (include "src/api5.skb"))))) + :see-also '(document chapter paragraph toc))) ;*--- paragraph -------------------------------------------------------*/ (subsection :title "Paragraph" diff --git a/doc/user/src/api4.skb b/doc/user/src/api4.skb deleted file mode 100644 index cfe13f7..0000000 --- a/doc/user/src/api4.skb +++ /dev/null @@ -1,2 +0,0 @@ -(chapter :title "This is a simple chapter" :number #f :toc #f [ -Its body is just one sentence.]) diff --git a/doc/user/src/api5.skb b/doc/user/src/api5.skb index 01188c1..072b5e8 100644 --- a/doc/user/src/api5.skb +++ b/doc/user/src/api5.skb @@ -1,2 +1,3 @@ -(section :title "This is a simple section" :number #f :toc #f [ -Its body is just one sentence.]) +(chapter :title "This is a simple chapter" :number #f :toc #f + + (p [Its body is just one sentence.])) |