scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Typo fix in log message.

This commit is contained in:
sperber 2002-01-11 13:18:34 +00:00
parent f5cd1798d3
commit 49de023eb7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ftpd.scm
View File

@ -292,7 +292,7 @@
"Command line: ~A" "Command line: ~A"
command-line) command-line)
(cond ((eq? command-line 'timeout) (cond ((eq? command-line 'timeout)
(log (syslog-level notice) "hit timeliimit of ~D seconds (421)" (log (syslog-level notice) "hit timelimit of ~D seconds (421)"
timeout-seconds) timeout-seconds)
(log (syslog-level debug) (log (syslog-level debug)
"so closing control connection and quitting") "so closing control connection and quitting")
@ -1126,7 +1126,7 @@
; Version ; Version
(define *ftpd-version* "$Revision: 1.28 $") (define *ftpd-version* "$Revision: 1.29 $")
(define (copy-port->port-binary input-port output-port) (define (copy-port->port-binary input-port output-port)
(let ((buffer (make-string *window-size*))) (let ((buffer (make-string *window-size*)))