Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -1961,11 +1961,11 @@
 
 ;; Update run_stats for given run_id
 ;; input data is a list (state status count)
 ;;
 (define (db:update-run-stats dbstruct run-id stats)
-  (mutex-lock! *db-stats-mutex*)
+  ;;(mutex-lock! *db-stats-mutex*)
   (db:with-db
    dbstruct
    #f
    #f
 
@@ -1983,11 +1983,11 @@
 		   (sqlite3:execute stmt1 run-id (car dat)(cadr dat))
 		   (apply sqlite3:execute stmt2 run-id dat))
 		 stats)))))
        (sqlite3:finalize! stmt1)
        (sqlite3:finalize! stmt2)
-       (mutex-unlock! *db-stats-mutex*)
+       ;;(mutex-unlock! *db-stats-mutex*)
        res))))
 
 (define (db:get-main-run-stats dbstruct run-id)
   (db:with-db
    dbstruct