Index: openacs-4/packages/dotlrn-ecommerce/www/admin/course-add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/course-add-edit.tcl,v diff -u -N -r1.4 -r1.5 --- openacs-4/packages/dotlrn-ecommerce/www/admin/course-add-edit.tcl 23 Jun 2005 12:32:55 -0000 1.4 +++ openacs-4/packages/dotlrn-ecommerce/www/admin/course-add-edit.tcl 22 Jul 2005 00:25:16 -0000 1.5 @@ -53,6 +53,7 @@ set count 1 foreach attribute $attribute_list { switch [lindex $attribute 2] { + display_p - community_id { continue } } set element_mode "" @@ -110,6 +111,10 @@ {value "$revision_id $cc_package_id"} {help_text "Hold the <Ctrl> key to select multiple categories"} } + {display_p:boolean(radio) + {label "[_ dotlrn-ecommerce.Display_Course]"} + {options {{Yes t} {No f}}} + } } ad_form -extend -name add_course -on_submit { @@ -190,6 +195,7 @@ set context [list [list course-list "[_ dotlrn-catalog.course_list]"] "[_ dotlrn-catalog.new_course]"] set page_title "[_ dotlrn-catalog.new_course]" set revision_id "-1" + set display_p t } -edit_request { set context [list [list course-list "[_ dotlrn-catalog.course_list]"] "[_ dotlrn-catalog.edit_course]"] set page_title "[_ dotlrn-catalog.edit_course]"