(sieve-upload): Don't use replace-regexp-in-string.

[gnus] / lisp / sieve.el

diff --git a/lisp/sieve.el b/lisp/sieve.el
index da2016b..8297f57 100644 (file)
--- a/lisp/sieve.el
+++ b/lisp/sieve.el
@@ -370,8 +370,7 @@ Server  : " server ":" (or port "2000") "
        (if (sieve-manage-ok-p err)
            (message (concat
                      "Sieve upload done.  Use `C-c RET' to manage scripts."))
-         (message "Sieve upload failed: %s"
-                  (replace-regexp-in-string "[\n\r\t]+" " " (nth 2 err))))))))
+         (message "Sieve upload failed: %s" (nth 2 err)))))))
 
 ;;;###autoload
 (defun sieve-upload-and-bury (&optional name)