remove tail, filter-list, filter-out-list,

[lilypond.git] / scm / documentation-lib.scm

diff --git a/scm/documentation-lib.scm b/scm/documentation-lib.scm
index df21108d1646fa246ce2ce077a13e80fca43d730..f5be4cb408935bc52142a442e6008719eca55423 100644 (file)
--- a/scm/documentation-lib.scm
+++ b/scm/documentation-lib.scm
@@ -6,7 +6,9 @@
 ;;; (c)  2000--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 ;;; Jan Nieuwenhuizen <janneke@gnu.org>
 
-(use-modules (oop goops))
+(use-modules (oop goops)
+            (srfi srfi-13)
+            )
 
 (define-class <texi-node> ()
   (children #:init-value '() #:accessor node-children #:init-keyword #:children)
@@ -114,7 +116,7 @@
   (apply string-append
         (map (lambda (x)
                (string-append
-               (pad-string-to 
+               (string-pad-right 
                 (string-append "\n* " (car x) ":: ")
                 (+ maxwid 8)
                 )