Index: common.scm
==================================================================
--- common.scm
+++ common.scm
@@ -123,11 +123,11 @@
   (set! *transport-type*
         (string->symbol
          (or
           (args:get-arg "-transport")
           (configf:lookup *configdat* "server" "transport")
-          "http")))
+          "rpc")))
   *transport-type*)
   
 (define *runremote*         #f)                ;; if set up for server communication this will hold <host port>
 (define *max-cache-size*    0)
 (define *logged-in-clients* (make-hash-table))