@@ -2781,13 +2781,13 @@
 			 (comment	(vector-ref test 14))   
 			 (test-status	(vector-ref test 4))
 			 (exc-msg	(conc "No bucket for State " test-state " Status " test-status))
 			 (new-doc	(cond 
 						((member test-state (list "RUNNING" ))
-							((sxml-modify `("testsuite" insert-into (testcase (@ (name ,tc-name)) (inProgress (@ (type "inProgress")))))) doc))
+							((sxml-modify `("testsuite" insert-into (testcase (@ (name ,tc-name)) (inProgress)))) doc))
 						((member test-state (list "LAUNCHED" "REMOTEHOSTSTART"  "NOT_STARTED"))
-							((sxml-modify `("testsuite" insert-into (testcase (@ (name ,tc-name)) (inProgress (@ (type "inQueue")))))) doc))
+							((sxml-modify `("testsuite" insert-into (testcase (@ (name ,tc-name)) (inQueue)))) doc))
 						((member test-status (list "PASS" "WARN" "WAIVED"))
 							((sxml-modify `("testsuite" insert-into (testcase (@ (name ,tc-name))))) doc))
 						((member test-status (list "FAIL" "CHECK"))
 							((sxml-modify `("testsuite" insert-into (testcase (@ (name ,tc-name)) (failure (@ (message ,comment) (type "failure")))))) doc)) 
 						((member test-status (list "DEAD" "KILLED" "ABORT" "PREQ_FAIL" "PREQ_DISCARDED"))