From: shuhei-k <shuhei-k>
Date: Thu, 18 Jun 1998 14:02:24 +0000 (+0000)
Subject: (smtp-via-smtp): Fix typo.
X-Git-Tag: semi-mule-199811302358~69
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=752649e5562255a616bbae9883041967eb93d16f;p=elisp%2Fgnus.git-

(smtp-via-smtp): Fix typo.
---

diff --git a/lisp/smtp.el b/lisp/smtp.el
index 2997e1c..bea46d0 100644
--- a/lisp/smtp.el
+++ b/lisp/smtp.el
@@ -74,10 +74,9 @@ don't define this value."
      (smtp-local-domain
       (concat system-name "." smtp-local-domain))
      ((string-match "[^.]\\.[^.]" system-name)
-      ;; `system-name' returned the right result.
-      system-name))
-    (t
-     (error "Cannot generate valid FQDN. Set `smtp-local-domain' correctly."))))
+      system-name)
+     (t
+      (error "Cannot generate valid FQDN. Set `smtp-local-domain' correctly.")))))
 
 (defun smtp-via-smtp (sender recipients smtp-text-buffer)
   (let ((coding-system-for-read smtp-coding-system)