summaryrefslogtreecommitdiff
path: root/email
diff options
context:
space:
mode:
Diffstat (limited to 'email')
-rw-r--r--email/email.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/email/email.scm b/email/email.scm
index 3f4e194..277be88 100644
--- a/email/email.scm
+++ b/email/email.scm
@@ -1,5 +1,6 @@
;;; guile-email --- Guile email parser
;;; Copyright © 2018, 2019, 2020, 2021 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2021 Mathieu Othacehe <othacehe@gnu.org>
;;;
;;; This file is part of guile-email.
;;;
@@ -832,7 +833,7 @@ values. The returned headers is a string and body is a bytevector."
(define (valid-charset? charset)
(catch #t
(lambda ()
- (bytevector->string (make-bytevector 0 0) charset)
+ (bytevector->string (make-bytevector 1 0) charset)
#t)
(const #f)))