From cf1b7d22af6b490d864ae9ae7282ca42f12dabc1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 30 Mar 1998 03:08:51 +0000 Subject: [PATCH] (ange-ftp-kill-ftp-process): Convert buffer name to the buffer. --- lisp/ange-ftp.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index 922dc28e4f1..c7e980e6f2c 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el @@ -1499,7 +1499,7 @@ then kill the related ftp process." (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." -- 2.39.2