Simpler implementation of nest-indent

openlilylib · Mar 14, 2017 · 39bba6e · 39bba6e
1 parent 590327f
commit 39bba6e
Showing 1 changed file with 1 addition and 6 deletions.
diff --git a/annotate/export-html.ily b/annotate/export-html.ily
@@ -29,12 +29,7 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 #(define (nest-indent inpt num)
-   (let* ((indentation ""))
-     (do ((i 0 (1+ i)))
-       ((= i num))
-       (set! indentation (string-append indentation "  ")))
-     (string-append indentation inpt)))
-
+   (string-append (make-string num #\space) inpt))
 
 % convenience functions
 #(define (classify-html-tag class)