Index: openacs-4/packages/cms/www/modules/items/publish-status.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/items/publish-status.tcl,v
diff -u -r1.6 -r1.6.2.1
--- openacs-4/packages/cms/www/modules/items/publish-status.tcl	19 Sep 2002 13:09:14 -0000	1.6
+++ openacs-4/packages/cms/www/modules/items/publish-status.tcl	7 Mar 2003 00:23:06 -0000	1.6.2.1
@@ -84,7 +84,7 @@
 	set difference [expr $min_n - $child_count]
 	set direction more
     }
-    if { ![string equal $max_n -] && $child_count > $max_n } {
+    if { ![string equal {} $max_n] && $child_count > $max_n } {
 	set row(is_fulfilled) f
 	incr unpublishable_child_types
 	set difference [expr $child_count - $max_n]
@@ -116,7 +116,7 @@
 	set difference [expr $min_n - $rel_count]
 	set direction more
     }
-    if { ![string equal $max_n -] && $rel_count > $max_n } {
+    if { ![string equal {} $max_n] && $rel_count > $max_n } {
 	set is_fulfilled f
 	incr unpublishable_rel_types
 	set difference [expr $rel_count - $max_n]