in ftpd: use signature calculus to get access to scsh's OPEN-OUTPUT-FILE instead of relying on the import order
This commit is contained in:
parent
fc6f2c5a1a
commit
db6b607d0f
|
@ -651,8 +651,8 @@
|
||||||
;; FTP server
|
;; FTP server
|
||||||
|
|
||||||
(define-structure ftpd ftpd-interface
|
(define-structure ftpd ftpd-interface
|
||||||
(open (modify scsh (hide char-set:whitespace))
|
(open (modify scheme (hide open-output-file))
|
||||||
scheme
|
(modify scsh (hide char-set:whitespace))
|
||||||
conditions handle signals
|
conditions handle signals
|
||||||
structure-refs
|
structure-refs
|
||||||
handle-fatal-error
|
handle-fatal-error
|
||||||
|
|
Loading…
Reference in New Issue