Index: openacs-4/contrib/packages/resource-list/www/add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/resource-list/www/add-edit.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/packages/resource-list/www/add-edit.tcl 30 Nov 2003 02:15:48 -0000 1.1 +++ openacs-4/contrib/packages/resource-list/www/add-edit.tcl 20 Feb 2004 01:11:53 -0000 1.2 @@ -86,6 +86,9 @@ permission::grant -party_id $user_id -object_id $resource_item_id -privilege write + util_memoize_flush "resource_list_pending_get_count_cached" + util_memoize_flush "resource_list_get_count_cached" + ad_returnredirect "one?[export_url_vars resource_item_id]" ad_script_abort Index: openacs-4/contrib/packages/resource-list/www/approve-delete-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/resource-list/www/approve-delete-2.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/contrib/packages/resource-list/www/approve-delete-2.tcl 9 Jan 2004 01:11:09 -0000 1.2 +++ openacs-4/contrib/packages/resource-list/www/approve-delete-2.tcl 20 Feb 2004 01:11:53 -0000 1.3 @@ -67,6 +67,10 @@ } +util_memoize_flush "resource_list_pending_get_count_cached" +util_memoize_flush "resource_list_get_count_cached" + + ad_returnredirect index # ------------------------- END OF FILE ------------------------- # Index: openacs-4/contrib/packages/resource-list/www/index-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/resource-list/www/index-postgresql.xql,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/packages/resource-list/www/index-postgresql.xql 30 Nov 2003 02:15:48 -0000 1.1 +++ openacs-4/contrib/packages/resource-list/www/index-postgresql.xql 20 Feb 2004 01:11:53 -0000 1.2 @@ -88,7 +88,8 @@ SELECT - t.short_name || ': ' || c.short_name as type_name + t.short_name as type_name, + c.short_name as cat_name FROM rl_resource_category_type t, rl_resource_category c Index: openacs-4/contrib/packages/resource-list/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/resource-list/www/index.adp,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/packages/resource-list/www/index.adp 30 Nov 2003 02:15:48 -0000 1.1 +++ openacs-4/contrib/packages/resource-list/www/index.adp 20 Feb 2004 01:11:53 -0000 1.2 @@ -1,6 +1,6 @@ -Resource List +Resource List @category_name@ @context_bar@

@current_category@

Index: openacs-4/contrib/packages/resource-list/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/resource-list/www/index.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/packages/resource-list/www/index.tcl 30 Nov 2003 02:15:48 -0000 1.1 +++ openacs-4/contrib/packages/resource-list/www/index.tcl 20 Feb 2004 01:11:53 -0000 1.2 @@ -23,6 +23,7 @@ types:multirow resources:multirow has_category_p:onevalue + category_name:onevalue current_category:onevalue categories_url:onevalue write_p:onevalue @@ -36,10 +37,16 @@ # set up context bar if {[exists_and_not_null category]} { set context_bar [ad_context_bar "Index"] - set current_category [db_string get_category_name { }] + + db_1row get_category_name { } + + set current_category "$type_name: $cat_name" + set category_name $cat_name + } else { set context_bar [list] + set category_name "" set current_category "" } Index: openacs-4/contrib/packages/resource-list/www/one.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/resource-list/www/one.adp,v diff -u -r1.2 -r1.3 --- openacs-4/contrib/packages/resource-list/www/one.adp 24 Dec 2003 06:41:46 -0000 1.2 +++ openacs-4/contrib/packages/resource-list/www/one.adp 20 Feb 2004 01:11:53 -0000 1.3 @@ -1,6 +1,6 @@ -Resource List +Resource List: @res.resource_title@ @context_bar@

@res.resource_title@