Index: openacs-4/contrib/packages/simulation/lib/portfolio.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/lib/Attic/portfolio.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/packages/simulation/lib/portfolio.tcl 19 Dec 2003 13:39:33 -0000 1.1 +++ openacs-4/contrib/packages/simulation/lib/portfolio.tcl 19 Dec 2003 14:48:30 -0000 1.2 @@ -5,14 +5,16 @@ @creation-date 2003-12-20 @cvs-id $Id$ } { - user_id {} case_id {} } +set upload_url [export_vars -base document-upload { case_id }] + template::list::create \ -name documents \ -multirow documents \ -no_data "There are no documents." \ + -actions [list "Upload a document" $upload_url] \ -elements { role_name { label "Role" @@ -38,5 +40,5 @@ and ci.live_revision = cr.revision_id order by scrom.order_n " { - set document_url [simulation::object::url -name $document_name] + set document_url [simulation::object::content_url -name $document_name] }