@@ -86,11 +86,11 @@
 (if (not (setup-for-run))
     (begin
       (print "Failed to find megatest.config, exiting") 
       (exit 1)))
 
-(define *db*  (make-dbr:dbstruct path: *toppath*))
+(define *db*  (make-dbr:dbstruct path: *toppath* local: #t))
 
 ;; (define sdb:qry (make-sdb:qry)) ;;  'init #f)
 
 ;; (if (args:get-arg "-host")
 ;;     (begin