@@ -26,10 +26,11 @@
 (declare (uses common))
 (declare (uses db))
 (declare (uses gutils))
 (declare (uses ezsteps))
 (declare (uses sdb))
+(declare (uses filedb))
 
 (include "common_records.scm")
 (include "db_records.scm")
 (include "run_records.scm")
 
@@ -384,11 +385,11 @@
 			       (cond
 				((and need-update newtestdat)
 				 (set! testdat newtestdat)
 				 (set! teststeps    (db:get-compressed-steps test-id work-area: rundir))
 				 (set! logfile      (conc (db:test-get-rundir testdat) "/" (db:test-get-final_logf testdat)))
-				 (set! rundir       (sdb:qry 'getstr (db:test-get-rundir testdat)))
+				 (set! rundir       (filedb:get-path *fdb* (db:test-get-rundir testdat)))
 				 (set! testfullname (db:test-get-fullname testdat))
 				 ;; (debug:print 0 "INFO: teststeps=" (intersperse teststeps "\n    "))
 				 (if (eq? curr-mod-time db-mod-time) ;; do only once if same
 				     (set! db-mod-time (+ curr-mod-time 1))
 				     (set! db-mod-time curr-mod-time))