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.9 -r1.10 --- openacs-4/packages/simulation/lib/sim-templates.tcl 11 Dec 2003 13:21:52 -0000 1.9 +++ openacs-4/packages/simulation/lib/sim-templates.tcl 11 Dec 2003 15:32:42 -0000 1.10 @@ -16,89 +16,89 @@ } set package_id [ad_conn package_id] -set add_url [export_vars -base "[apm_package_url_from_id $package_id]simbuild/template-edit" ] +set add_url [export_vars -base "[apm_package_url_from_id $package_id]simbuild/template-edit"] set create_p [permission::permission_p -object_id $package_id -privilege sim_template_create] +set actions [list "Add a template" $add_url {} \ + "Load a template" "[apm_package_url_from_id $package_id]simbuild/template-load" {}] + # TODO: make this include honor the display_mode parameter switch $size { short { - template::list::create \ - -name sim_templates \ - -multirow sim_templates \ - -actions " {Add a template} $add_url " \ - -elements { - name { - label "Template" - link_url_col edit_url - orderby upper(ot.pretty_name) - } - role_count { - label "Roles" - } - task_count { - label "Tasks" - } - } + set elements { + name { + label "Template" + link_url_col edit_url + orderby upper(ot.pretty_name) + } + role_count { + label "Roles" + } + task_count { + label "Tasks" + } + } } default { - template::list::create \ - -name sim_templates \ - -multirow sim_templates \ - -actions " {Add a template} $add_url " \ - -elements { - edit { - sub_class narrow - display_template { - - - Edit - - - } - } - name { - label "Name" - orderby upper(ot.pretty_name) - link_url_col view_url - } - description { - label "Description" - orderby r.description - } - created_by { - label "Created by" - orderby r.createdby - } - role_count { - label "Roles" - } - task_count { - label "Tasks" - } - delete { - sub_class narrow - display_template { - - - Delete - - - } - } - clone { - display_template { - Clone this template - } - + set elements { + edit { + sub_class narrow + display_template { + + + Edit + + } - - } + } + name { + label "Name" + orderby upper(ot.pretty_name) + link_url_col view_url + } + description { + label "Description" + orderby r.description + } + created_by { + label "Created by" + orderby r.createdby + } + role_count { + label "Roles" + } + task_count { + label "Tasks" + } + delete { + sub_class narrow + display_template { + + + Delete + + + } + } + clone { + display_template { + Clone this template + } + + } + } } } +template::list::create \ + -name sim_templates \ + -multirow sim_templates \ + -actions $actions \ + -elements $elements + ###################################################################### # # sim_templates