@@ -128,11 +128,11 @@
 	(set! *runremote* newremote)
 	(set! runremote newremote)))
   (let* ((dbfname (conc (dbfile:run-id->dbnum rid)".db"))) ;;(dbfile:run-id->path areapath run-id)))
     (tt:handler runremote cmd rid params attemptnum area-dat areapath readonly-mode dbfname testsuite mtexe)))
 	
-(define (http-transport-handler runremote cmd rid params attemptnum area-dat areapath readonly-mode testsuite mtexe)
+(define (http-transport-handler runremote cmd rid params attemptnum area-dat areapath readonly-mode)
   ;; do all the prep locked under the rmt-mutex
   (mutex-lock! *rmt-mutex*)
   
   ;; ensure we have a record for our connection for given area
   (if (not runremote)                   ;; can remove this one. should never get here.