Index: api-inc.scm
==================================================================
--- api-inc.scm
+++ api-inc.scm
@@ -16,14 +16,15 @@
 ;;     You should have received a copy of the GNU General Public License
 ;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 ;;
 ;;======================================================================
 
-
+;; Moved to commonmod
+;;
 ;; allow these queries through without starting a server
 ;;
-(define api:read-only-queries
+#;(define api:read-only-queries
   '(get-key-val-pairs
     get-var
     get-keys
     get-key-vals
     test-toplevel-num-items
@@ -77,11 +78,13 @@
     ;; synchash-get
     get-changed-record-ids
 		get-run-record-ids 
     get-not-completed-cnt))
 
-(define api:write-queries
+;; moved to commonmod
+;;
+#;(define api:write-queries
   '(
     get-keys-write ;; dummy "write" query to force server start
 
     ;; SERVERS
     start-server

Index: dashboard.scm
==================================================================
--- dashboard.scm
+++ dashboard.scm
@@ -65,11 +65,11 @@
 
 (include "common_records.scm")
 (include "db_records.scm")
 (include "run_records.scm")
 (include "task_records.scm")
-(include "megatest-fossil-hash.scm")
+;; (include "megatest-fossil-hash.scm") ;; comes from megamod
 (include "vg_records.scm")
 
 ;; invoke the imports
 (declare (uses commonmod.import))
 (declare (uses megamod.import))

Index: megamod.scm
==================================================================
--- megamod.scm
+++ megamod.scm
@@ -143,12 +143,12 @@
 
 ;;======================================================================
 ;; L O C K I N G   M E C H A N I S M S 
 ;;======================================================================
 
-(include "megatest-fossil-hash.scm")
-(include "megatest-version.scm")
+;; (include "megatest-fossil-hash.scm") ;; try getting this from commonmod
+;; (include "megatest-version.scm")
 
 ;; globals
 (define *writes-total-delay* 0)
 (define *exit-started* #f)
 (define *last-monitor-update-time* 0)

Index: megatest.scm
==================================================================
--- megatest.scm
+++ megatest.scm
@@ -77,11 +77,11 @@
 
 (include "common_records.scm")
 (include "key_records.scm")
 (include "db_records.scm")
 (include "run_records.scm")
-(include "megatest-fossil-hash.scm")
+;; (include "megatest-fossil-hash.scm") ;; included in megamod
 
 (define getenv get-environment-variable)
 (configf:add-eval-string "(import megamod)")
 
 (define *usage-log-file* #f)    ;; put path to file for logging usage in this var in the ~/.megatestrc file

Index: mtexec.scm
==================================================================
--- mtexec.scm
+++ mtexec.scm
@@ -37,11 +37,11 @@
 
 ;; (declare (uses rmt))
 
 ;; (use ducttape-lib)
 
-(include "megatest-fossil-hash.scm")
+;; (include "megatest-fossil-hash.scm") ;; comes from megamod now
 
 ;; (require-library stml)
 
 (define help (conc "
 mtutil, part of the Megatest tool suite, documentation at http://www.kiatoa.com/fossils/megatest

Index: mtut.scm
==================================================================
--- mtut.scm
+++ mtut.scm
@@ -39,11 +39,11 @@
 
 ;; (declare (uses rmt))
 
 (use ducttape-lib)
 
-(include "megatest-fossil-hash.scm")
+;; (include "megatest-fossil-hash.scm") ;; comes from megamod
 
 ;; (require-library stml)
 (use stml2)
 
 ;; stuff for the mapper and checker functions

Index: tcmt.scm
==================================================================
--- tcmt.scm
+++ tcmt.scm
@@ -36,11 +36,11 @@
 (declare (uses megamod))
 (declare (uses commonmod))
 (import megamod)
 (import commonmod)
 
-(include "megatest-fossil-hash.scm")
+;; (include "megatest-fossil-hash.scm") ;; comes from megamod
 (include "db_records.scm")
 
 (define origargs (cdr (argv)))
 (define remargs (args:get-args
 		 (argv)