about summary refs log tree commit diff
path: root/doc/user/char.skb
diff options
context:
space:
mode:
authorLudovic Courtès2008-04-07 22:22:16 +0200
committerLudovic Courtès2008-04-07 22:22:16 +0200
commit9745ff5744d97fa66b42587e6a304d3bdf8054ab (patch)
treeb807c4ce5c4532b8ee351a8c0a24e34e28936c70 /doc/user/char.skb
parentf8afeb805f2409283dc37d4e0a16e01303a4f5aa (diff)
downloadskribilo-9745ff5744d97fa66b42587e6a304d3bdf8054ab.tar.gz
skribilo-9745ff5744d97fa66b42587e6a304d3bdf8054ab.tar.lz
skribilo-9745ff5744d97fa66b42587e6a304d3bdf8054ab.zip
doc: Use the native API instead of `--compat=skribe'.
* doc/user/Makefile.am (skrflags): Remove `--compat=skribe'.

* doc/user/*.skb: Trivial API update.
Diffstat (limited to 'doc/user/char.skb')
-rw-r--r--doc/user/char.skb14
1 files changed, 11 insertions, 3 deletions
diff --git a/doc/user/char.skb b/doc/user/char.skb
index c56c455..d036c21 100644
--- a/doc/user/char.skb
+++ b/doc/user/char.skb
@@ -1,5 +1,6 @@
 ;;; char.skb  --  Characters, strings and symbols
 ;;;
+;;; Copyright 2008  Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright 2003, 2004  Manuel Serrano
 ;;;
 ;;;
@@ -86,13 +87,20 @@ of the capacity of the targeted format.])
                (tr :bg  *prgm-skribe-color*
                    (td :align 'left s)
                    (td :align 'left (symbol s))))
-            (sort (let ((t (make-hashtable)))
+            (sort (let ((t (make-hash-table)))
                      (for-each (lambda (e)
                                   (for-each (lambda (s)
-                                               (hashtable-put! t (car s) (car s)))
+                                               (hash-set! t (car s) (car s)))
                                             (engine-symbol-table e)))
                                *api-engines*)
-                     (hashtable->list t))
+                     (hash-fold (lambda (key value result)
+		                  (cons key result))
+				'()
+				t))
                   string<?)))))
 
 
+;;; Local Variables:
+;;; coding: latin-1
+;;; ispell-local-dictionary: "american"
+;;; End: