Importing Oort Gnus v0.06.

[elisp/gnus.git-] / lisp / gnus-ml.el

diff --git a/lisp/gnus-ml.el b/lisp/gnus-ml.el
index 41f85ae..978b2e3 100644 (file)
--- a/lisp/gnus-ml.el
+++ b/lisp/gnus-ml.el
@@ -177,7 +177,7 @@ If FORCE is non-nil, replace the old ones."
     (cond
      ((string-match "<mailto:\\([^>]*\\)>" address)
       (let ((args (match-string 1 address)))
-       (cond                                   ; with param
+       (cond                           ; with param
         ((string-match "\\(.*\\)\\?\\(.*\\)" args)
          (setq mailto (match-string 1 args))
          (let ((param (match-string 2 args)))
@@ -188,7 +188,7 @@ If FORCE is non-nil, replace the old ones."
            (if (string-match "to=\\([^&]*\\)" param)
                (push (match-string 1 param) to))
            ))
-        (t (setq mailto args)))))                      ; without param
+        (t (setq mailto args)))))      ; without param
 
      ; other case <http://... to be done.
      (t nil))