Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -1524,11 +1524,11 @@
      "SELECT count(id) FROM tests WHERE state in ('RUNNING','LAUNCHED','REMOTEHOSTSTART') AND run_id=? AND NOT (uname = 'n/a' AND item_path = '');" run-id)
     res))
 
  ;; override states to count with list of strings.
 ;;
-(define (db:get-count-tests-running-for-run-id -blah db run-id states)
+(define (db:get-count-tests-running-for-run-id-blah db run-id states)
   (let ((res 0)
 	(sqrystr (conc "SELECT count(id) FROM tests WHERE state in ('"
 		       (if states
 			   (string-intersperse states "','")
 			   "RUNNING','LAUNCHED','REMOTEHOSTSTART")