summaryrefslogtreecommitdiff
path: root/xml-rpc-server.scm
diff options
context:
space:
mode:
Diffstat (limited to 'xml-rpc-server.scm')
-rw-r--r--xml-rpc-server.scm4
1 files changed, 1 insertions, 3 deletions
diff --git a/xml-rpc-server.scm b/xml-rpc-server.scm
index 52eebcc..89bd852 100644
--- a/xml-rpc-server.scm
+++ b/xml-rpc-server.scm
@@ -42,9 +42,7 @@
(call-xml-rpc-proc xml-rpc-call->xml-rpc-response
make-xml-rpc-request-handler start-simple-xml-rpc-server)
-(import chicken scheme)
-(use srfi-13 srfi-18 extras data-structures tcp
- xml-rpc-lolevel sxpath-lolevel ssax intarweb)
+(import (chicken base) (chicken condition) (chicken format) (chicken io) scheme srfi-13 srfi-18 (chicken tcp) xml-rpc-lolevel sxpath-lolevel ssax intarweb)
(define (call-xml-rpc-proc call-sxml procedures)
(or (and-let* ((call ((select-first-kid (ntype?? 'methodCall)) call-sxml))