@@ -1400,11 +1400,10 @@
     (sort tdat (lambda (a b)
 		 (let* ((aval (db:test-get-testname a));;(vector-ref a 2))
 			(bval (db:test-get-testname b));;(vector-ref b 2))
 			(anum (string->number aval))
 			(bnum (string->number bval)))
-		 	(print a b)
 		   (if (and anum bnum)
 		       (< anum bnum)
 		       (string<= aval bval)))))))