From 9745ff5744d97fa66b42587e6a304d3bdf8054ab Mon Sep 17 00:00:00 2001
From: Ludovic Courtès
Date: Mon, 7 Apr 2008 22:22:16 +0200
Subject: doc: Use the native API instead of `--compat=skribe'.

* doc/user/Makefile.am (skrflags): Remove `--compat=skribe'.

* doc/user/*.skb: Trivial API update.
---
 doc/user/slide.skb | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

(limited to 'doc/user/slide.skb')

diff --git a/doc/user/slide.skb b/doc/user/slide.skb
index 92d3f43..aa7edb7 100644
--- a/doc/user/slide.skb
+++ b/doc/user/slide.skb
@@ -31,29 +31,29 @@
 	     (ta (table (tr (map (lambda (n)
 				    (td :valign 'top :align 'center n))
 	                         (if (list? a) a (list a)))))))
-	 (skribe-eval (center (bold t)) e)
-	 (skribe-eval (center ta) e)
+	 (evaluate-document (center (bold t)) e)
+	 (evaluate-document (center ta) e)
 	 (output b e))))
 
 (define dummy-slide-output
    (lambda (n e)
       (let* ((t (markup-option n :title))
 	     (b (markup-body n)))
-	 (skribe-eval (bold t) e)
+	 (evaluate-document (bold t) e)
 	 (output b e))))
 
 (define dummy-slide-vspace-output
    (lambda (n e)
-     (skribe-eval (linebreak) e)
-     (skribe-eval (center (tt "[vspace]")) e)
-     (skribe-eval (linebreak) e)))
+     (evaluate-document (linebreak) e)
+     (evaluate-document (center (tt "[vspace]")) e)
+     (evaluate-document (linebreak) e)))
 
 (define dummy-slide-embed-output
    (lambda (n e)
-     (skribe-eval (linebreak) e)
-     (skribe-eval (tt (or (markup-option n :alt)
+     (evaluate-document (linebreak) e)
+     (evaluate-document (tt (or (markup-option n :alt)
 			  (markup-option n :command)))
-		  e)))
+		  	e)))
 
 ;*---------------------------------------------------------------------*/
 ;*    Computer programs                                                */
-- 
cgit v1.2.3