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]