Index: openacs-4/packages/user-tracking/www/advanced-communities-chunk-large.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-tracking/www/advanced-communities-chunk-large.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/user-tracking/www/advanced-communities-chunk-large.tcl 14 Apr 2005 15:44:27 -0000 1.2 +++ openacs-4/packages/user-tracking/www/advanced-communities-chunk-large.tcl 19 Apr 2005 10:01:36 -0000 1.3 @@ -23,7 +23,7 @@ } -form create community_search -action "/user-tracking/pruebas/advanced-stats" +form create community_search -action "[user-tracking::get_package_url]/advanced-stats" element create community_search search_text \ -label [_ dotlrn.Search] \ @@ -43,6 +43,18 @@ -widget hidden \ -value $referer +element create community_search Users \ + -label "Users" \ + -datatype text \ + -widget hidden \ + -value $Users + +element create community_search Communities \ + -label "Communities" \ + -datatype text \ + -widget hidden \ + -value $Communities + element create community_search type_request \ -label type_request \ -datatype text \ 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" \ Index: openacs-4/packages/user-tracking/www/advanced-users-stats.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-tracking/www/advanced-users-stats.adp,v diff -u -r1.2 -r1.3 --- openacs-4/packages/user-tracking/www/advanced-users-stats.adp 14 Apr 2005 15:44:27 -0000 1.2 +++ openacs-4/packages/user-tracking/www/advanced-users-stats.adp 19 Apr 2005 10:01:36 -0000 1.3 @@ -3,11 +3,11 @@ - + - + Index: openacs-4/packages/user-tracking/www/communities-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-tracking/www/communities-chunk.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/user-tracking/www/communities-chunk.tcl 14 Apr 2005 15:44:27 -0000 1.2 +++ openacs-4/packages/user-tracking/www/communities-chunk.tcl 19 Apr 2005 10:01:36 -0000 1.3 @@ -12,7 +12,7 @@ set user_id [ad_conn user_id] if {![exists_and_not_null referer]} { - set referer "[dotlrn::get_admin_url]/communities" + set referer "[user-tracking::get_package_url]/communities-stats" } ad_return_template Index: openacs-4/packages/user-tracking/www/users-chunk-large.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-tracking/www/users-chunk-large.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/user-tracking/www/users-chunk-large.tcl 14 Apr 2005 15:44:28 -0000 1.2 +++ openacs-4/packages/user-tracking/www/users-chunk-large.tcl 19 Apr 2005 10:01:36 -0000 1.3 @@ -9,6 +9,9 @@ user_id:onevalue users:multirow } +if {![exists_and_not_null type]} { + set type admin +} if {![exists_and_not_null referer]} { set referer "[user-tracking::get_package_url]/users-stats"