Index: dbfile.scm
==================================================================
--- dbfile.scm
+++ dbfile.scm
@@ -478,11 +478,11 @@
                                  status TEXT,
                                  purpose TEXT,
                                  dbname TEXT,
                                  mtversion TEXT,
                                  reason TEXT DEFAULT 'none',
-                                   CONSTRAINT no_sync_processes UNIQUE (host,pid);"
+                                   CONSTRAINT no_sync_processes UNIQUE (host,pid));"
 			    ))))))
 	 (on-tmp      (equal? (car (string-split dbpath "/")) "tmp"))
 	 (db        (if on-tmp
 			(dbfile:cautious-open-database dbname init-proc 0 "WAL")
 			(dbfile:cautious-open-database dbname init-proc 0 #f)