Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v diff -u -r1.191.2.13 -r1.191.2.14 --- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 15 Apr 2014 06:33:15 -0000 1.191.2.13 +++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 15 Apr 2014 06:37:54 -0000 1.191.2.14 @@ -3171,7 +3171,7 @@ collab-graph instproc render {} { my get_parameters - if {$show_anonymous ne "all" && [::xo::cc user_id] eq 0} { + if {$show_anonymous ne "all" && [::xo::cc user_id] eq "0"} { return "You must login to see the [namespace tail [self class]]" } if {![info exists user_id]} {set user_id [::xo::cc user_id]} @@ -3254,7 +3254,7 @@ activity-graph instproc render {} { my get_parameters - if {$show_anonymous ne "all" && [::xo::cc user_id] eq 0} { + if {$show_anonymous ne "all" && [::xo::cc user_id] eq "0"} { return "You must login to see the [namespace tail [self class]]" } Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -r1.472.2.15 -r1.472.2.16 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 15 Apr 2014 06:33:15 -0000 1.472.2.15 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 15 Apr 2014 06:37:54 -0000 1.472.2.16 @@ -245,7 +245,7 @@ autoname proc new {-parent_id -name} { while {1} { set generated_name [my generate -parent_id $parent_id -name $name] - if {[::xo::db::CrClass lookup -name $generated_name -parent_id $parent_id] eq 0} { + if {[::xo::db::CrClass lookup -name $generated_name -parent_id $parent_id] eq "0"} { return $generated_name } }