@@ -2,11 +2,11 @@
 (use (prefix sqlite3 sqlite3:) posix typed-records) 
 
 (define (open-tail-db )
   (let* ((basedir   (create-directory (conc "/tmp/" (current-user-name))))
 	 (dbpath    (conc basedir "/megatest_logs.db"))
-	 (dbexists  (file-exists? dbpath))
+	 (dbexists  (common:file-exists? dbpath))
 	 (db        (sqlite3:open-database dbpath))
 	 (handler   (sqlite3:make-busy-timeout 136000)))
     (sqlite3:set-busy-handler! db handler)
     (sqlite3:execute db "PRAGMA synchronous = 0;")
     (if (not dbexists)