From 54ae61cd32d6580791aff55bfce96386fdff9550 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Sat, 1 Dec 2007 16:01:58 +0100 Subject: 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. --- doc/user/package.skb | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) (limited to 'doc/user/package.skb') 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 +;;; 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 */ -- cgit v1.2.3