Index: openacs-4/packages/dotlrn-catalog/www/dt-admin/course-add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/dt-admin/course-add-edit.tcl,v diff -u -r1.7.2.1 -r1.7.2.2 --- openacs-4/packages/dotlrn-catalog/www/dt-admin/course-add-edit.tcl 4 Jul 2005 21:20:35 -0000 1.7.2.1 +++ openacs-4/packages/dotlrn-catalog/www/dt-admin/course-add-edit.tcl 19 Jul 2005 11:18:40 -0000 1.7.2.2 @@ -78,6 +78,11 @@ set aditional_elements [list options $asm_list] } } + boolean { + if { [string equal [lindex $attribute 2] "active_p"]} { + set aditional_type "(checkbox)" + } + } date { if { [string equal [lindex $attribute 2] "start_date"] } { set aditional_type "(text),optional" @@ -90,7 +95,6 @@ set aditional_elements_2 {after_html { \[y-m-d\] }} } } - } set element [list [lindex $attribute 2]:text${aditional_type} [list label [lindex $attribute 3]] $aditional_elements $aditional_elements_2 $element_mode] lappend elements $element