From e9509518623d016880392237a298d4561a3b6a0b Mon Sep 17 00:00:00 2001
From: Ludovic Courtes
Date: Mon, 31 Oct 2005 16:03:18 +0000
Subject: Removed useless files, integrated packages.

* src/guile/skribilo/packages: New directory and files.

* bin: Removed.

* skr: Removed (files moved to `src/guile/skribilo/packages').

* skribe: Removed.

* doc/skr/env.skr (*courtes-mail*): New.

* doc/user/user.skb: Removed postal addresses, added my name.

* src/guile/skribilo/engine/lout.scm: Uncommented the slide-related
  markup writers.

* src/guile/skribilo/evaluator.scm (%evaluate): Try weird things with
  source properties.

* src/guile/skribilo/reader/skribe.scm: Comply with the new guile-reader
  API.

* src/guile/skribilo/types.scm: Removed the special `initialize' method
  for ASTs which was supposed to set their location.

git-archimport-id: lcourtes@laas.fr--2005-mobile/skribilo--devel--1.2--patch-7
---
 skribe/doc/user/src/bib5.skb | 24 ------------------------
 1 file changed, 24 deletions(-)
 delete mode 100644 skribe/doc/user/src/bib5.skb

(limited to 'skribe/doc/user/src/bib5.skb')

diff --git a/skribe/doc/user/src/bib5.skb b/skribe/doc/user/src/bib5.skb
deleted file mode 100644
index a0ee361..0000000
--- a/skribe/doc/user/src/bib5.skb
+++ /dev/null
@@ -1,24 +0,0 @@
-(center
- (frame :border 1 :margin 2 :width 90.
-	(processor :engine
-		   (make-engine '_ :filter string-upcase)
-		   :combinator
-		   (lambda (e1 e2)
-		      (let ((e (copy-engine '_ e2)))
-			 (markup-writer '&bib-entry-ident e
-					:action
-					(lambda (n e)
-					   (let* ((be (ast-parent n))
-						  (o (markup-option be 'author))
-						  (y (markup-option be 'year)))
-					      (output (markup-body o) e1)
-					      (display ":")
-					      (output (markup-body y) e))))
-			 (markup-writer '&bib-entry-title e
-					:action
-					(lambda (n e)
-					   (skribe-eval (it (markup-body n)) e)))
-			 e))
-		   (the-bibliography :pred 
-				     (lambda (m n)
-					(eq? (markup-option m 'kind) 'book))))))
-- 
cgit v1.2.3