Index: openacs-4/packages/project-manager/lib/fs-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/lib/fs-portlet.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/project-manager/lib/fs-portlet.adp 26 May 2005 12:44:08 -0000 1.1 @@ -0,0 +1,10 @@ + +#forums.Forums# + + + + +   + + + \ No newline at end of file Index: openacs-4/packages/project-manager/lib/fs-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/lib/fs-portlet.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/project-manager/lib/fs-portlet.tcl 26 May 2005 12:44:08 -0000 1.1 @@ -0,0 +1,18 @@ +# packages/project-manager/lib/forums-portlet.tcl +# +# +# +# @author Malte Sussdorff (sussdorff@sussdorff.de) +# @creation-date 2005-05-26 +# @arch-tag: 2e370b1e-543b-41ee-9517-f4445927a286 +# @cvs-id $Id: fs-portlet.tcl,v 1.1 2005/05/26 12:44:08 maltes Exp $ + +foreach required_param {folder_id} { + if {![info exists $required_param]} { + return -code error "$required_param is a required parameter." + } +} + + +set package_id [acs_object::get_element -object_id $folder_id -element package_id] +set base_url [apm_package_url_from_id $package_id] Index: openacs-4/packages/project-manager/www/one.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/www/one.adp,v diff -u -r1.4 -r1.5 --- openacs-4/packages/project-manager/www/one.adp 26 May 2005 12:24:11 -0000 1.4 +++ openacs-4/packages/project-manager/www/one.adp 26 May 2005 12:44:08 -0000 1.5 @@ -76,6 +76,11 @@ forum_id="@forum_id@" />

+ + +