summaryrefslogtreecommitdiff
path: root/skribe/doc/user/examples.skb
diff options
context:
space:
mode:
Diffstat (limited to 'skribe/doc/user/examples.skb')
-rw-r--r--skribe/doc/user/examples.skb34
1 files changed, 0 insertions, 34 deletions
diff --git a/skribe/doc/user/examples.skb b/skribe/doc/user/examples.skb
deleted file mode 100644
index a37ece4..0000000
--- a/skribe/doc/user/examples.skb
+++ /dev/null
@@ -1,34 +0,0 @@
-;*=====================================================================*/
-;* serrano/prgm/project/skribe/doc/user/examples.skb */
-;* ------------------------------------------------------------- */
-;* Author : Manuel Serrano */
-;* Creation : Wed Sep 3 13:35:34 2003 */
-;* Last change : Tue Feb 3 14:52:33 2004 (serrano) */
-;* Copyright : 2003-04 Manuel Serrano */
-;* ------------------------------------------------------------- */
-;* The list of examples */
-;*=====================================================================*/
-
-;*---------------------------------------------------------------------*/
-;* Examples */
-;*---------------------------------------------------------------------*/
-(chapter :title "List of examples"
-
-(resolve (lambda (n e env)
- (let* ((d (ast-document n))
- (ex (container-env-get d 'example-env)))
- (table (map (lambda (e)
- (tr (td :align 'left
- (markup-option e :number)
- ". "
- (ref :handle (handle e)
- :text (markup-option e :legend))
- " (chapter "
- (let ((c (ast-chapter e)))
- (ref :handle (handle c)
- :text (markup-option c :title)))
- ")")))
- (sort ex
- (lambda (e1 e2)
- (< (markup-option e1 :number)
- (markup-option e2 :number))))))))))