Index: openacs-4/packages/acs-automated-testing/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/www/index.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-automated-testing/www/index.tcl	26 Feb 2004 13:36:50 -0000	1.4
+++ openacs-4/packages/acs-automated-testing/www/index.tcl	10 Jan 2007 21:22:02 -0000	1.5
@@ -14,7 +14,7 @@
 multirow create servers path admin_login_url local_url remote_url name description install_date error_total_count parse_errors
 
 set xml_report_dir [aa_test::xml_report_dir]
-if { ![empty_string_p $xml_report_dir] } {
+if { $xml_report_dir ne "" } {
     foreach path [glob $xml_report_dir/*-installreport.xml] {
         aa_test::parse_install_file -path $path -array service