(rfc2047-encode-region): Do error out on invalid

strings.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f4f0d48..6099d87 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2003-10-18  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * rfc2047.el (rfc2047-encode-region): Do error out on invalid
+       strings. 
+
        * nntp.el (nntp-retrieve-headers-with-xover): Get error messages
        right. 
 

diff --git a/lisp/rfc2047.el b/lisp/rfc2047.el
index bc54575..d4d6e96 100644 (file)
--- a/lisp/rfc2047.el
+++ b/lisp/rfc2047.el
@@ -378,8 +378,8 @@ Dynamically bind `rfc2047-encoding-type' to change that."
                    (rfc2047-encode start end)
                    (setq last-encoded t)))))
            (error
-            (message "Invalid data for rfc2047 encoding: %s"
-                     (buffer-substring b e)))))))
+            (error "Invalid data for rfc2047 encoding: %s"
+                   (buffer-substring b e)))))))
     (rfc2047-fold-region b (point))))
 
 (defun rfc2047-encode-string (string)