(rfc2231-parse-string): Remove dead code.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8c9b15c..27b6503 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-04-17  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * rfc2231.el (rfc2231-parse-string): Remove dead code.
+
 2006-04-17  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * nntp.el (nntp-accept-process-output): Return the value of

diff --git a/lisp/rfc2231.el b/lisp/rfc2231.el
index d066591..629d56a 100644 (file)
--- a/lisp/rfc2231.el
+++ b/lisp/rfc2231.el
@@ -208,10 +208,8 @@ must never cause a Lisp error."
                      parameters)))
          (error
           (setq parameters nil)
-          (if signal-error
-              (signal (car err) (cdr err))
-            ;;(message "%s" (error-message-string err))
-            )))
+          (when signal-error
+            (signal (car err) (cdr err)))))
 
        (cons type (nreverse parameters))))))