From 752649e5562255a616bbae9883041967eb93d16f Mon Sep 17 00:00:00 2001 From: shuhei-k Date: Thu, 18 Jun 1998 14:02:24 +0000 Subject: [PATCH] (smtp-via-smtp): Fix typo. --- lisp/smtp.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) 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) -- 1.7.10.4