diff --git a/ftpd.scm b/ftpd.scm index b8747df..5afe717 100644 --- a/ftpd.scm +++ b/ftpd.scm @@ -187,7 +187,6 @@ maybe-args ((port 21) (logfile #f)) - (display "ping!\n") (if logfile (set! *logfile* (open-output-file logfile (bitwise-ior open/create open/append)))) (with-syslog-destination @@ -1215,7 +1214,7 @@ ; Version -(define *ftpd-version* "$Revision: 1.33 $") +(define *ftpd-version* "$Revision: 1.34 $") (define (copy-port->port-binary input-port output-port) (let ((buffer (make-string *window-size*)))