change load order of scheme and scsh in ftpd to get access to scsh's open-output-file

2002-09-28 12:37:42 +00:00 · 2002-09-28 12:37:42 +00:00 · 6a090fba6b
parent b8a1ec9024
commit 6a090fba6b
1 changed files with 2 additions and 1 deletions
--- a/scheme/packages.scm
+++ b/scheme/packages.scm
@ -651,7 +651,8 @@
 ;; FTP server

 (define-structure ftpd ftpd-interface 
-  (open scheme (modify scsh (hide char-set:whitespace))
+  (open (modify scsh (hide char-set:whitespace)) 
+	scheme
 	conditions handle signals
 	structure-refs
 	handle-fatal-error