Index: openacs-4/packages/dotfolio/tcl/dotfolio-users-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotfolio/tcl/dotfolio-users-procs.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotfolio/tcl/dotfolio-users-procs.tcl 5 Jun 2005 12:28:37 -0000 1.5 +++ openacs-4/packages/dotfolio/tcl/dotfolio-users-procs.tcl 5 Jun 2005 13:42:55 -0000 1.6 @@ -178,7 +178,7 @@ Add a user as a dotfolio user. } { # Check if the user is already a dotfolio user - if {[user_p -user_id $user_id]} { + if {[dotfolio::user_p -user_id $user_id]} { return } @@ -196,7 +196,7 @@ set rel_id [relation_add \ -extra_vars $extra_vars \ -member_state approved \ - [get_rel_type_from_user_type -type $type] \ + [dotfolio::get_rel_type_from_user_type -type $type] \ "" \ $user_id \ ]