diff --git a/vfs/ChangeLog b/vfs/ChangeLog
index ff58a1187..d0a72f75e 100644
--- a/vfs/ChangeLog
+++ b/vfs/ChangeLog
@@ -1,3 +1,8 @@
+2003-06-05  Pavel Roskin  <proski@gnu.org>
+
+	* ftpfs.c (ftpfs_done): New function.  Free ftpfs_proxy_host and
+	ftpfs_anonymous_passwd.
+
 2003-05-30  Pavel Roskin  <proski@gnu.org>
 
 	* extfs/trpm: Fix compatibility with the secure temporary
diff --git a/vfs/ftpfs.c b/vfs/ftpfs.c
index bcf4a600b..5dab5b942 100644
--- a/vfs/ftpfs.c
+++ b/vfs/ftpfs.c
@@ -1728,6 +1728,13 @@ static struct vfs_s_data ftp_data = {
     linear_close
 };
 
+static void
+ftpfs_done (vfs *me)
+{
+    g_free (ftpfs_anonymous_passwd);
+    g_free (ftpfs_proxy_host);
+}
+
 static void
 ftpfs_fill_names (vfs *me, void (*func)(char *))
 {
@@ -1750,7 +1757,7 @@ vfs vfs_ftpfs_ops = {
     &ftp_data,	/* data */
     0,		/* errno */
     NULL,	/* init */
-    NULL,	/* done */
+    ftpfs_done,	/* done */
     ftpfs_fill_names,
     NULL,