@@ -54,10 +54,11 @@
 (declare (uses configfmod.import))
 (declare (uses bigmod.import))
 (declare (uses dbmod.import))
 (declare (uses rmtmod.import))
 (declare (uses servermod.import))
+(declare (uses http-transportmod))
 
 ;; (include "call-with-environment-variables/call-with-environment-variables.scm")
 
 (module megatest-main
 	*
@@ -526,10 +527,18 @@
      Version " megatest-version ", built from " megatest-fossil-hash ))
      
 (define (main)
   (make-and-init-bigdata)
 
+  
+  ;; set up the functions in http transport
+  (hash-table-set! *http-functions* 'api:process-request          api:process-request)
+  (hash-table-set! *http-functions* 'http-transport:main-page     http-transport:main-page)
+  (hash-table-set! *http-functions* 'http-transport:show-jquery   http-transport:show-jquery)
+  (hash-table-set! *http-functions* 'http-transport:html-test-log http-transport:html-test-log)
+  (hash-table-set! *http-functions* 'http-transport:html-dboard   http-transport:html-dboard)
+  
 ;; load the ~/.megatestrc file, put (use trace)(trace-call-sites #t)(trace function-you-want-to-trace) in this file
 ;;
 (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.megatestrc")))
   (if (common:file-exists? debugcontrolf)
       (load debugcontrolf)))