Index: dashboard.scm
==================================================================
--- dashboard.scm
+++ dashboard.scm
@@ -72,10 +72,11 @@
 
 ;; set some parameters here - these need to be put in something that can be loaded from other
 ;; executables such as dashboard and mtutil
 ;;
 (include "dashboard-transport-mode.scm")
+
 (dbfile:db-init-proc db:initialize-main-db)
 (set! rmtmod:send-receive rmt:send-receive)
 
 (define help (conc 
 	      "Megatest Dashboard, documentation at http://www.kiatoa.com/fossils/megatest version " megatest-version 
@@ -118,13 +119,13 @@
 		 0))
 
 (if (args:get-arg "-mode")
     (let* ((mode (string->symbol (args:get-arg "-mode"))))
       (rmt:transport-mode mode))
-    (rmt:transport-mode 'tcp))
+)
 
-(if (args:get-arg "-test") ;; need to use tcp for test control panel
+(if (args:get-arg "-test") ;; need to use tcp for test control panel -- Why? - Martin
     (rmt:transport-mode 'tcp))
 
 ;; RA => Might require revert for filters 
 ;; create a watch dog to move changes from lt/.db/*.db to megatest.db
 ;;