Index: openacs-4/packages/contacts/www/admin/attribute-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/admin/Attic/attribute-add.tcl,v
diff -u -N
--- openacs-4/packages/contacts/www/admin/attribute-add.tcl	13 Jan 2005 13:57:10 -0000	1.2
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,66 +0,0 @@
-ad_page_contract {
-
-    list all attributes avaiable, and let the user edit edit permissions, regroup, etc.
-
-    @author Matthew Geddert openacs@geddert.com
-    @creation-date 2004-07-28
-    @cvs-id $Id: attribute-add.tcl,v 1.2 2005/01/13 13:57:10 jeffd Exp $
-
-} {
-    group_id:optional
-    groupby:optional
-    orderby:optional
-    {format "normal"}
-    {status "normal"}
-}
-
-
-set title "Add an Attribute"
-set context [list [list "attributes" "Attributes"] $title]
-
-
-
-
-list::create \
-    -name entries \
-    -multirow entries \
-    -key course_id \
-    -row_pretty_plural "Widgets" \
-    -checkbox_name checkbox \
-    -selected_format $format \
-    -class "list" \
-    -main_class "list" \
-    -sub_class "narrow" \
-    -pass_properties {
-        variable
-    } -actions {
-    } -bulk_actions {
-    } -elements {
-        widget_id {
-            display_col description
-            label "Select a Widget"
-            link_url_eval $attribute_add_url
-        }
-    } -filters {
-    } -groupby {
-    } -orderby {
-    } -formats {
-        normal {
-            label "Table"
-            layout table
-            row {
-                widget_id {}
-            }
-        }
-    }
-
-
-
-# This query will override the ad_page_contract value entry_id
-
-db_multirow -extend { attribute_add_url } -unclobber entries select_widgets {} {
-    set attribute_add_url "attribute-ae?widget_id=$widget_id"
-}
-
-ad_return_template
-