From: ueno <ueno>
Date: Fri, 15 Dec 2000 15:16:34 +0000 (+0000)
Subject: * smtp.el (smtp-send-buffer): Pass the BUFFER argument.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=2cbe7d49dca691dc3283d7c411df30327b361781;p=elisp%2Fflim.git

* smtp.el (smtp-send-buffer): Pass the BUFFER argument.
---

diff --git a/ChangeLog b/ChangeLog
index 15d746e..654354b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2000-12-15   Daiki Ueno  <ueno@unixuser.org>
+
+	* smtp.el (smtp-send-buffer): Pass the BUFFER argument.
+
 2000-12-15  Katsumi Yamaoka   <yamaoka@jpl.org>
 
 	* smtp.el: Require `pcustom' instead of `custom'.
diff --git a/smtp.el b/smtp.el
index a2cbb6c..e389660 100644
--- a/smtp.el
+++ b/smtp.el
@@ -275,7 +275,7 @@ of the host to connect to.  SERVICE is name of the service desired."
        (get-buffer-create
 	(format "*trace of SMTP session to %s*" server)))
       (erase-buffer)
-      (buffer-disable-undo)
+      (buffer-disable-undo (current-buffer))
       (unless (smtp-find-connection (current-buffer))
 	(smtp-open-connection (current-buffer) server smtp-service))
       (make-local-variable 'smtp-read-point)