@@ -179,13 +179,13 @@
 
 ;; make-vector-record tasks hostinfo id interface port pubport transport pid hostname
 (define (tasks:hostinfo-get-id          vec)    (vector-ref  vec 0))
 (define (tasks:hostinfo-get-interface   vec)    (vector-ref  vec 1))
 (define (tasks:hostinfo-get-port        vec)    (vector-ref  vec 2))
-(define (tasks:hostinfo-get-pubport     vec)    (vector-ref  vec 3))
+;; (define (tasks:hostinfo-get-pubport     vec)    (vector-ref  vec 3))
 (define (tasks:hostinfo-get-transport   vec)    (vector-ref  vec 4))
-(define (tasks:hostinfo-get-pid         vec)    (vector-ref  vec 5))
+;; (define (tasks:hostinfo-get-pid         vec)    (vector-ref  vec 5))
 (define (tasks:hostinfo-get-hostname    vec)    (vector-ref  vec 6))
 
 (define (tasks:need-server run-id)
   (equal? (configf:lookup *configdat* "server" "required") "yes"))