Index: openacs-4/packages/simulation/lib/sim-templates.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/lib/sim-templates.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/simulation/lib/sim-templates.tcl	18 Nov 2003 14:22:55 -0000	1.6
+++ openacs-4/packages/simulation/lib/sim-templates.tcl	2 Dec 2003 13:46:53 -0000	1.7
@@ -81,6 +81,13 @@
                         </a>
 		    }
 		}
+		clone {
+		    display_template {
+                        <a href="@sim_templates.clone_url@">Clone this template</a>
+                    }
+
+                }
+
 	    }
     }
 }
@@ -94,7 +101,7 @@
 #
 ######################################################################
 
-db_multirow -extend { edit_url view_url delete_url } sim_templates select_sim_templates "
+db_multirow -extend { edit_url view_url delete_url clone_url } sim_templates select_sim_templates "
     select w.workflow_id,
            w.pretty_name as name,
            'placeholder' as description,
@@ -119,4 +126,6 @@
     set view_url [export_vars -base "[apm_package_url_from_id $package_id]simbuild/template-edit" {workflow_id} ]
 
     set delete_url [export_vars -base "[apm_package_url_from_id $package_id]simbuild/template-delete" {workflow_id} ]
+
+    set clone_url [export_vars -base "[apm_package_url_from_id $package_id]simbuild/template-clone" {workflow_id} ]
 }