Index: openacs-4/packages/acs-service-contract/www/contract-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/www/contract-display.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/acs-service-contract/www/contract-display.tcl	17 May 2003 09:56:59 -0000	1.3
+++ openacs-4/packages/acs-service-contract/www/contract-display.tcl	16 Sep 2003 08:30:00 -0000	1.4
@@ -19,4 +19,26 @@
     order by o.contract_name, o.operation_name, t.msg_type_name, e.element_pos }
 
 
-db_multirow valid_installed_binding valid_installed_binding ""
+template::list::create \
+    -name bindings \
+    -multirow valid_installed_binding \
+    -elements {
+        impl_name {
+            label "Implementation Name"
+        }
+        impl_pretty_name {
+            label "Label"
+        }
+        impl_owner_name {
+            label "Owner"
+        }
+        uninstall {
+            label {}
+            link_url_eval {[export_vars -base binding-uninstall { contract_id impl_id }]}
+            link_html { title "Uninstall binding" }
+            display_template {Uninstall}
+            sub_class narrow
+        }
+    }
+
+db_multirow valid_installed_binding valid_installed_binding {}