From 68dbb49e269d55e26a6a074da7231c7a4efb3545 Mon Sep 17 00:00:00 2001 From: ueno Date: Thu, 2 Nov 2000 19:20:48 +0000 Subject: [PATCH] (smtp-primitive-rcptto): Fix typo. --- smtp.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/smtp.el b/smtp.el index 61d493d..3f8324a 100644 --- a/smtp.el +++ b/smtp.el @@ -464,10 +464,10 @@ of the host to connect to. SERVICE is name of the service desired." response) (while recipients (smtp-send-command - process (format "RCPT TO:<%s>" (pop recipients)))) - (setq response (smtp-read-response process)) - (unless (memq (car response) '(250 251)) - (smtp-response-error response)))) + process (format "RCPT TO:<%s>" (pop recipients))) + (setq response (smtp-read-response process)) + (unless (memq (car response) '(250 251)) + (smtp-response-error response))))) (defun smtp-primitive-data (package) (let* ((connection -- 1.7.10.4