Index: openacs-4/packages/static-portlet/www/static-admin-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/www/static-admin-portlet.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/static-portlet/www/static-admin-portlet.tcl 18 Feb 2002 05:23:12 -0000 1.2 +++ openacs-4/packages/static-portlet/www/static-admin-portlet.tcl 18 Feb 2002 20:23:00 -0000 1.3 @@ -12,19 +12,10 @@ set instance_id $config(instance_id) -# aks - i forget if this is a list, so just keep this stuff here -# -#if {[llength $list_of_instance_ids] > 1} { -# # We have a problem! -# return -code error "There should be only one instance of bboard for admin purposes" -#} -# -#set instance_id [lindex $list_of_instance_ids 0] -# - db_multirow content select_content " select content_id, pretty_name from static_portal_content where instance_id = :instance_id" +set template_portal_id [dotlrn_community::get_portal_template_id [dotlrn_community::get_community_id]] # set url [dotlrn_community::get_url_from_package_id -package_id $instance_id]