@@ -185,11 +185,11 @@
    -1                         ;; pubport
    (random 1000)              ;; priority (used a tiebreaker on get-available)
    "available"                ;; state
    (common:version-signature) ;; mt_version
    -1                         ;; interface
-   "http"                     ;; transport
+   (conc *transport-type*)    ;; transport
    run-id
    ))
 
 (define (tasks:num-in-available-state mdb run-id)
   (let ((res 0))