Index: openacs-4/contrib/packages/simulation/lib/sim-template-tasks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/lib/Attic/sim-template-tasks.tcl,v
diff -u -r1.40 -r1.41
--- openacs-4/contrib/packages/simulation/lib/sim-template-tasks.tcl	15 Mar 2004 10:31:20 -0000	1.40
+++ openacs-4/contrib/packages/simulation/lib/sim-template-tasks.tcl	15 Mar 2004 17:22:18 -0000	1.41
@@ -68,6 +68,14 @@
         </if>
     }
 }
+lappend elements copy {
+    hide_p {[ad_decode $display_mode edit 0 1]}
+    sub_class narrow
+    link_url_col copy_url
+    display_template {
+        <img src="/resources/acs-subsite/Copy16.gif" height="16" width="16" border="0" alt="Copy">
+    }
+}
 
 lappend elements name { 
     label "<br />Name"
@@ -159,7 +167,7 @@
 #-------------------------------------------------------------
 
 set extend [list]
-lappend extend edit_url view_url delete_url assigned_role_edit_url up_url down_url add_child_action_url
+lappend extend edit_url view_url delete_url assigned_role_edit_url up_url down_url add_child_action_url copy_url
 
 foreach state_id $states {
     lappend extend state_$state_id
@@ -216,6 +224,7 @@
     set view_url [export_vars -base "[apm_package_url_from_id $package_id]simbuild/task-edit" -anchor tasks { action_id {return_url "[ad_return_url]\#tasks"}}]
     set delete_url \
         [export_vars -base "[apm_package_url_from_id $package_id]simbuild/task-delete" { action_id {return_url "[ad_return_url]\#tasks"} }]
+    set copy_url [export_vars -base task-copy { action_id {return_url "[ad_return_url]\#tasks"} }]
 
     set assigned_role_edit_url \
         [export_vars -base "[apm_package_url_from_id $package_id]simbuild/role-edit" { { role_id $assigned_role } }]