changeset 21313:47c514f3eed4

(ange-ftp-kill-ftp-process): Convert buffer name to the buffer.
author Richard M. Stallman <rms@gnu.org>
date Mon, 30 Mar 1998 03:08:51 +0000
parents b5b8f2545eae
children 7d4a55d38b2c
files lisp/ange-ftp.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ange-ftp.el	Sun Mar 29 02:35:51 1998 +0000
+++ b/lisp/ange-ftp.el	Mon Mar 30 03:08:51 1998 +0000
@@ -1499,7 +1499,7 @@
 	  (if parsed
 	      (let ((host (nth 0 parsed))
 		    (user (nth 1 parsed)))
-		(kill-buffer (ange-ftp-ftp-process-buffer host user))))))))
+		(kill-buffer (get-buffer (ange-ftp-ftp-process-buffer host user)))))))))
 
 (defun ange-ftp-quote-string (string)
   "Quote any characters in STRING that may confuse the ftp process."