Index: openacs-4/packages/dotlrn/www/admin/users-add-to-community.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-add-to-community.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn/www/admin/users-add-to-community.tcl 14 Feb 2002 18:03:07 -0000 1.1 +++ openacs-4/packages/dotlrn/www/admin/users-add-to-community.tcl 12 Mar 2002 05:25:58 -0000 1.2 @@ -23,6 +23,12 @@ -widget hidden \ -value $users +element create select_community referer \ + -label "Referer" \ + -datatype text \ + -widget hidden \ + -value $referer + set communities [db_list_of_lists select_all_communities { select pretty_name, community_id from dotlrn_communities