Index: openacs-4/packages/user-tracking/www/advanced-users-chunk-large.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-tracking/www/advanced-users-chunk-large.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/user-tracking/www/advanced-users-chunk-large.tcl 14 Apr 2005 15:44:27 -0000 1.2 +++ openacs-4/packages/user-tracking/www/advanced-users-chunk-large.tcl 19 Apr 2005 10:01:36 -0000 1.3 @@ -13,12 +13,16 @@ set type_request user } +if {![exists_and_not_null type]} { + set type admin +} + if {![exists_and_not_null referer]} { set referer "[user-tracking::get_package_url]/advanced-stats" } -form create user_search -action "/user-tracking/pruebas/advanced-stats" +form create user_search -action "[user-tracking::get_package_url]/advanced-stats" element create user_search search_text \ -label [_ dotlrn.Search] \ @@ -37,6 +41,18 @@ -datatype text \ -widget hidden \ -value $referer + +element create user_search Users \ + -label "Users" \ + -datatype text \ + -widget hidden \ + -value $Users + +element create user_search Communities \ + -label "Communities" \ + -datatype text \ + -widget hidden \ + -value $Communities element create user_search type_request \ -label "type_request" \