diff --git a/scheme/lib/ftp.scm b/scheme/lib/ftp.scm
index 88eec85..19956a0 100644
--- a/scheme/lib/ftp.scm
+++ b/scheme/lib/ftp.scm
@@ -6,112 +6,6 @@
 ;;; For copyright information, see the file COPYING which comes with
 ;;; the distribution.
 
-
-
-;;; Overview =========================================================
-;;
-;; This module lets you transfer files between networked machines from
-;; the Scheme Shell, using the File Transfer Protocol as described
-;; in rfc959. The protocol specifies the behaviour of a server
-;; machine, which runs an ftp daemon (not implemented by this module),
-;; and of clients (that's us) which request services from the server.
-
-
-;;; Entry points =======================================================
-;;
-;; (ftp-connect host [logfile]) -> connection
-;;     Open a command connection with the remote machine HOST.
-;;     Optionally start logging the conversation with the server to
-;;     LOGFILE, which will be appended to if it already exists, and
-;;     created otherwise. Beware, the LOGFILE contains passwords in
-;;     clear text (it is created with permissions og-rxw) !
-;;
-;; (ftp-login connection [login passwd]) -> status
-;;     Log in to the remote host. If a login and password are not
-;;     provided, they are first searched for in the user's ~/.netrc
-;;     file, or default to user "anonymous" and password "user@host"
-;;
-;; (ftp-type connection type) -> status
-;;     Change the transfer mode for future data connections. This may
-;;     be either 'ascii or 'text, respectively, for transfering text files, 
-;;     or 'binary for transfering binary files. If type is a string it
-;;     is sent verbatim to the server.
-;;
-;; (ftp-rename connection oldname newname) -> status
-;;     Change the name of oldname on the remote host to newname
-;;     (assuming sufficient permissions). oldname and newname are
-;;     strings; if prefixed with "/" they are taken relative to the
-;;     server's root, and otherwise they are relative to the current
-;;     directory. Note that in the case of anonymous ftp (user
-;;     "anonymous" or "ftp"), the server root is different from the
-;;     root of the servers's filesystem.
-;;
-;; (ftp-delete connection file) -> status
-;;     Delete file from the remote host (assuming the user has
-;;     appropriate permissions).
-;;
-;; (ftp-cd connection dir) -> status
-;;     Change the current directory on the server.
-;;
-;; (ftp-cdup connection) -> status
-;;     Move to the parent directory on the server.
-;;
-;; (ftp-pwd connection) -> string
-;;     Return the current directory on the remote host, as a string.
-;;
-;; (ftp-ls connection) -> status
-;;     Provide a listing of the current directory's contents, in short
-;;     format, ie as a list of filenames.
-;;
-;; (ftp-dir connection) -> status
-;;     Provide a listing of the current directory's contents, in long
-;;     format. Most servers (Unix, MS Windows, MacOS) use a standard
-;;     format with one file per line, with the file size and other
-;;     information, but other servers (VMS, ...) use their own format.
-;;
-;; (ftp-get connection remote-file [local-file]) -> status | string
-;;     Download remote-file from the FTP server. If local-file is a
-;;     string, save the data to local-file on the local host;
-;;     otherwise save to a local file named remote-file. remote-file
-;;     and local-file may be absolute file names (with a leading `/'),
-;;     or relative to the current directory. It local-file is #t,
-;;     output data to (current-output-file), and if it is #f return
-;;     the data as a string.
-;;
-;; (ftp-put connection local-file [remote-file]) -> status
-;;     Upload local-file to the FTP server. If remote-file is
-;;     specified, the save the data to remote-file on the remote host;
-;;     otherwise save to a remote file named local-file. local-file
-;;     and remote-file may be absolute file names (with a leading
-;;     `/'), or relative to the current directory.
-;;
-;; (ftp-rmdir connection dir) -> status
-;;     Remove the directory DIR from the remote host (assuming
-;;     sufficient permissions).
-;;
-;; (ftp-mkdir connection dir) -> status
-;;     Create a new directory named DIR on the remote host (assuming
-;;     sufficient permissions).
-;;
-;; (ftp-modification-time connection file) -> date
-;;     Request the time of the last modification of FILE on the remote
-;;     host, and on success return a Scsh date record. This command is
-;;     not part of RFC959 and is not implemented by all servers, but
-;;     is useful for mirroring.
-;;
-;; (ftp-size connection file) -> integer
-;;     Return the size of FILE in bytes.
-;;
-;; (ftp-abort connection) -> status
-;;     Abort the current data transfer. Not particularly useful with
-;;     this implementation since the data transfer commands only
-;;     return once the transfer is complete.
-;;
-;; (ftp-quit connection) -> status
-;;     Close the connection to the remote host. The connection object
-;;     is useless after a quit command.
-
-
 ;;; Unimplemented =====================================================
 ;;
 ;; This module has no support for sites behind a firewall (because I
@@ -566,5 +460,3 @@
          (write-string line LOG)
          (write-string "\n" LOG)
          (force-output LOG))))
-
-;; EOF