summaryrefslogtreecommitdiff
path: root/module/sxml/upstream/input-parse.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/sxml/upstream/input-parse.scm')
-rw-r--r--module/sxml/upstream/input-parse.scm5
1 files changed, 2 insertions, 3 deletions
diff --git a/module/sxml/upstream/input-parse.scm b/module/sxml/upstream/input-parse.scm
index e0bccfda8..5f9e08c4b 100644
--- a/module/sxml/upstream/input-parse.scm
+++ b/module/sxml/upstream/input-parse.scm
@@ -154,9 +154,8 @@
; (e.g., during XML parsing).
(define input-parse:init-buffer
- (let ((buffer (make-string 512)))
- (lambda () buffer)))
-
+ (lambda () (make-string 512)))
+
; See a better version below
(define-opt (next-token-old prefix-skipped-chars break-chars