commit 9d63634de56cde32c05b9d4e55a08686659cb078
parent 0050a89d4935ccaf50f3e9aaf786054e371c3d52
Author: Adriel Dumas--Jondeau <leirda@disroot.org>
Date: Wed, 19 Jun 2024 22:50:34 +0200
Corrige l’appel à `xml->sxml'
Diffstat:
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/duper.scm b/duper.scm
@@ -20,7 +20,7 @@
(define (load-svg path)
(let* ((ns "http://www.w3.org/2000/svg")
(sxml (with-input-from-file path
- (lambda () (xml->sxml #:trim-whitespaces? #t
+ (lambda () (xml->sxml #:trim-whitespace? #t
#:namespaces
`((ns . ,ns)))))))
(svg-uns (caddr sxml))))