summaryrefslogtreecommitdiff
path: root/doc/user/package.skb
diff options
context:
space:
mode:
authorLudovic Courtès2007-12-01 16:01:58 +0100
committerLudovic Courtès2007-12-01 16:01:58 +0100
commit54ae61cd32d6580791aff55bfce96386fdff9550 (patch)
tree628ad90a727839e76f0c2f20dcf058e6f895b4a7 /doc/user/package.skb
parentdc4a68366c60ae8c0e9f2f4632d28bd8cae52cd0 (diff)
downloadskribilo-54ae61cd32d6580791aff55bfce96386fdff9550.tar.gz
skribilo-54ae61cd32d6580791aff55bfce96386fdff9550.tar.lz
skribilo-54ae61cd32d6580791aff55bfce96386fdff9550.zip
doc: Improve building using the Lout engine, with a `book' style.
* doc/modules/skribilo/documentation/api.scm (doc-engine): Use `ctrtable' instead of `table'. * doc/modules/skribilo/documentation/manual.scm: Add customs for the `lout' engine. (ctrtable): New. (prgm): Don't center frames in Lout. * doc/user/Makefile.am (EXTRA_DIST): Add `lout/book-style.lout'. (%.ps): Add "-r4 -I$(srcdir)/lout". * doc/user/char.skb: Use `ctrtable' instead of `(center (table...' for the list of chars. * doc/user/markup.skb: Add emacsology. * doc/user/package.skb: Don't show the sample code with non-HTML engines. * doc/user/src/html-navtabs.skb: Fix typo. * doc/user/user.skb: Don't produce out-of-chapter text in Lout.
Diffstat (limited to 'doc/user/package.skb')
-rw-r--r--doc/user/package.skb12
1 files changed, 9 insertions, 3 deletions
diff --git a/doc/user/package.skb b/doc/user/package.skb
index dba26b3..f51dacf 100644
--- a/doc/user/package.skb
+++ b/doc/user/package.skb
@@ -1,7 +1,7 @@
;;; package.skb -- Packages
;;;
-;;; Copyright 2001, 2004, 2005 Manuel Serrano
;;; Copyright 2007 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2001, 2004, 2005 Manuel Serrano
;;;
;;;
;;; This program is free software; you can redistribute it and/or modify
@@ -198,9 +198,15 @@ container.]))
(subsubsection :title [Example]
+ (resolve (lambda (n e env)
+ ;; XXX: In Lout, the sample code is unbreakable for
+ ;; some reason, which breaks the whole document.
+ (if (engine-format? "html" e)
+ (list
(p [Below is a full example using ,(tt [html-navtabs]).])
-
- (prgm :file "src/html-navtabs.skb")))))
+ (prgm :file "src/html-navtabs.skb"))
+ [Please see the HTML version of the manual
+ for an example.])))))))
;*---------------------------------------------------------------------*/
;* Emacs indentation */