Index: openacs-4/packages/acs-admin/www/apm/cvs-status.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/Attic/cvs-status.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-admin/www/apm/cvs-status.tcl	24 Sep 2003 18:23:36 -0000	1.3
+++ openacs-4/packages/acs-admin/www/apm/cvs-status.tcl	10 Jan 2007 21:21:59 -0000	1.4
@@ -37,7 +37,7 @@
 	    global vc_file_props
 	    if { [regexp {[a-zA-Z]} $vc_file_props(status)] } {
 		set status "$vc_file_props(status)"
-		if { ![string compare $status "Up-to-date"] } {
+		if { $status eq "Up-to-date" } {
 		    # It's up to date; don't print anything out.
 		    continue
 		}