removed leftover line

svn: r10165

collects/swindle/extra.ss

@@ -606,7 +606,8 @@
   (port-display-handler (current-output-port) display-object)
   (port-display-handler (current-error-port)  display-object)
   (port-write-handler   (current-output-port) write-object)
-  (port-write-handler   (current-error-port)  write-object))
+  (port-write-handler   (current-error-port)  write-object)
+  (current-print write-object))
 
 ;;; ---------------------------------------------------------------------------
 ;;>>... Simple matching

collects/swindle/tool.ss

@@ -9,8 +9,7 @@
          mzlib/list
          mred
          net/sendurl
-         string-constants
-         swindle/extra)
+         string-constants)
 (provide tool@)
 
 (define tool@