Index: openacs-4/packages/bboard-portlet/tcl/bboard-admin-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bboard-portlet/tcl/bboard-admin-portlet-procs.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/bboard-portlet/tcl/bboard-admin-portlet-procs.tcl 9 May 2002 23:59:51 -0000 1.5 +++ openacs-4/packages/bboard-portlet/tcl/bboard-admin-portlet-procs.tcl 10 May 2002 03:58:26 -0000 1.6 @@ -61,7 +61,6 @@ -portlet_name [get_my_name] ] - # XXX AKS1 needs instance_id params??? portal::set_element_param $element_id "instance_id" $instance_id return $element_id } Index: openacs-4/packages/calendar-portlet/tcl/calendar-full-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/tcl/calendar-full-portlet-procs.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/calendar-portlet/tcl/calendar-full-portlet-procs.tcl 9 May 2002 23:59:51 -0000 1.4 +++ openacs-4/packages/calendar-portlet/tcl/calendar-full-portlet-procs.tcl 10 May 2002 03:58:26 -0000 1.5 @@ -40,7 +40,10 @@ ad_proc -public get_pretty_name { } { - return [ad_parameter "full_portlet_pretty_name" [my_package_key]] + return [oacs_util::parameter \ + -key "full_portlet_pretty_name" \ + -package_key [my_package_key] + ] } ad_proc -public link { Index: openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl,v diff -u -r1.26 -r1.27 --- openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl 9 May 2002 23:59:51 -0000 1.26 +++ openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl 10 May 2002 03:58:26 -0000 1.27 @@ -38,7 +38,10 @@ ad_proc -public get_pretty_name { } { - return [ad_parameter "pretty_name" [my_package_key]] + return [oacs_util::parameter \ + -key "pretty_name" \ + -package_key [my_package_key] + ] } ad_proc -public link { Index: openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl,v diff -u -r1.35 -r1.36 --- openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl 9 May 2002 23:59:53 -0000 1.35 +++ openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl 10 May 2002 03:58:26 -0000 1.36 @@ -41,7 +41,10 @@ ad_proc -public get_pretty_name { } { - return [ad_parameter "pretty_name" [my_package_key]] + return [oacs_util::parameter \ + -key "pretty_name" \ + -package_key [my_package_key] + ] } ad_proc -public link { Index: openacs-4/packages/new-portal/tcl/portal-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.tcl,v diff -u -r1.136 -r1.137 --- openacs-4/packages/new-portal/tcl/portal-procs.tcl 9 May 2002 23:59:53 -0000 1.136 +++ openacs-4/packages/new-portal/tcl/portal-procs.tcl 10 May 2002 03:58:26 -0000 1.137 @@ -1354,6 +1354,9 @@ # We use the actual pretty name from the DB (ben) # FIXME: this is not as good as it should be + + ns_log notice "aks1 $element(ds_name) / $element(pretty_name)" + if {$element(ds_name) == $element(pretty_name)} { set element(name) \ Index: openacs-4/packages/news-portlet/sql/oracle/news-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-portlet/sql/oracle/news-portlet-create.sql,v diff -u -r1.9 -r1.10 --- openacs-4/packages/news-portlet/sql/oracle/news-portlet-create.sql 9 May 2002 23:59:53 -0000 1.9 +++ openacs-4/packages/news-portlet/sql/oracle/news-portlet-create.sql 10 May 2002 03:58:27 -0000 1.10 @@ -93,7 +93,7 @@ datasource_id => ds_id, config_required_p => 't', configured_p => 'f', - key => 'community_id', + key => 'instance_id', value => '' ); Index: openacs-4/packages/news-portlet/tcl/news-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-portlet/tcl/news-portlet-procs.tcl,v diff -u -r1.14 -r1.15 --- openacs-4/packages/news-portlet/tcl/news-portlet-procs.tcl 9 May 2002 23:59:53 -0000 1.14 +++ openacs-4/packages/news-portlet/tcl/news-portlet-procs.tcl 10 May 2002 03:58:27 -0000 1.15 @@ -38,7 +38,10 @@ ad_proc -public get_pretty_name { } { - return [ad_parameter "news_portlet_pretty_name" [my_package_key]] + return [oacs_util::parameter \ + -key "news_portlet_pretty_name" \ + -package_key [my_package_key] + ] } ad_proc -public link {