Index: openacs-4/packages/acs-subsite/www/admin/attributes/add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/attributes/add.tcl,v
diff -u -r1.4 -r1.4.2.1
--- openacs-4/packages/acs-subsite/www/admin/attributes/add.tcl	7 Aug 2017 23:47:58 -0000	1.4
+++ openacs-4/packages/acs-subsite/www/admin/attributes/add.tcl	16 May 2019 09:54:29 -0000	1.4.2.1
@@ -1,5 +1,3 @@
-# /packages/mbryzek-subsite/www/admin/attribute/add.tcl
-
 ad_page_contract {
 
     Form to adds attributes
@@ -18,17 +16,17 @@
     datatypes:multirow
 } -validate {
     dynamic_type -requires {object_type:notnull} {
-	if { ![package_type_dynamic_p $object_type] } {
-	    ad_complain "The specified object type, $object_type, is not dynamic and therefore cannot be modified."
-	}
+        if { ![package_type_dynamic_p $object_type] } {
+            ad_complain "The specified object type, $object_type, is not dynamic and therefore cannot be modified."
+        }
     }
 }
 
 set context [list "Add attribute"]
 set export_vars [export_vars -form {object_type return_url}]
 
 set object_pretty_name [db_string object_pretty_name {
-    select t.pretty_name 
+    select t.pretty_name
       from acs_object_types t
      where t.object_type = :object_type
 }]
@@ -44,8 +42,8 @@
      order by lower(d.datatype)
 } {
     if { [attribute::datatype_validator_exists_p $datatype] } {
-	incr ctr
-	template::multirow append datatypes $datatype
+        incr ctr
+        template::multirow append datatypes $datatype
     }
 }