Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -1479,12 +1479,12 @@
 ;;======================================================================
 
 (define (db:get-dbsync-path)
   (case (rmt:transport-mode)
     ((http)(common:get-db-tmp-area))
-    ((tcp) (conc *toppath*"/.megatest"))
-    ((nfs) (conc *toppath*"/.megatest"))
+    ((tcp) (conc *toppath*"/.mtdb"))
+    ((nfs) (conc *toppath*"/.mtdb"))
     (else "/tmp/dunno-this-gonna-exist")))
 
 ;; This is needed for api.scm
 (define (db:open-no-sync-db)
    (dbfile:open-no-sync-db (db:get-dbsync-path)))

Index: dbmod.scm
==================================================================
--- dbmod.scm
+++ dbmod.scm
@@ -49,18 +49,22 @@
 (define (dbmod:run-id->dbfname run-id)
   (conc (dbfile:run-id->dbnum run-id)".db"))
 
 (define (dbmod:get-dbdir dbstruct)
   (let* ((areapath (dbr:dbstruct-areapath dbstruct))
-	 (dbdir    (conc areapath"/.megatest")))
+	 (dbdir    (conc areapath"/.mtdb")))
     (if (and (file-write-access? areapath)
 	     (not (file-exists? dbdir)))
 	(create-directory dbdir))
     dbdir))
 
 (define (dbmod:run-id->full-dbfname dbstruct run-id)
-  (conc (dbmod:get-dbdir dbstruct run-id)"/"(dbmod:run-id->dbfname run-id)))
+  (conc (dbmod:get-dbdir dbstruct
+
+			 run-id
+
+			 )"/"(dbmod:run-id->dbfname run-id)))
 
 ;;======================================================================
 ;; Read-only inmem cached direct from disk method
 ;;======================================================================