Index: openacs-4/packages/glossar/www/glossar-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/glossar/www/glossar-edit.tcl,v diff -u -N -r1.8 -r1.9 --- openacs-4/packages/glossar/www/glossar-edit.tcl 12 Feb 2019 18:00:04 -0000 1.8 +++ openacs-4/packages/glossar/www/glossar-edit.tcl 12 Feb 2019 18:45:14 -0000 1.9 @@ -1,7 +1,7 @@ ad_page_contract { - + Change a Glossar - + @author Bjoern Kiesbye (bjoern_kiesbye@web.de) @creation-date 2005-07-09 @cvs-id $Id$ @@ -34,20 +34,20 @@ if {$translation_p == "t"} { ad_form -extend -name glossar-edit -form { - - {source_category_id:integer(category) {label "[_ glossar.glossar_source_category]"} {category_tree_id $source_tree_id} {category_assign_single_p t} {category_require_category_p t} {category_mapped $source_cat_id}} - {target_category_id:integer(category) {label "[_ glossar.glossar_target_category]"} {category_tree_id $target_tree_id} {category_assign_single_p t} {category_require_category_p t} {category_mapped $target_cat_id}} + {source_category_id:integer(category) {label "[_ glossar.glossar_source_category]"} {category_tree_id $source_tree_id} {category_assign_single_p t} {category_require_category_p t} {category_mapped $source_cat_id}} - } + {target_category_id:integer(category) {label "[_ glossar.glossar_target_category]"} {category_tree_id $target_tree_id} {category_assign_single_p t} {category_require_category_p t} {category_mapped $target_cat_id}} + } + } else { ad_form -extend -name glossar-edit -form { - {source_category_id:integer(category) {label "[_ glossar.glossar_single_category]"} {category_tree_id $source_tree_id} {category_assign_single_p t} {category_require_category_p t} {category_mapped $source_cat_id}} + {source_category_id:integer(category) {label "[_ glossar.glossar_single_category]"} {category_tree_id $source_tree_id} {category_assign_single_p t} {category_require_category_p t} {category_mapped $source_cat_id}} - {target_category_id:text(hidden) {value ""}} - } + {target_category_id:text(hidden) {value ""}} + } } @@ -65,11 +65,11 @@ if {[llength $options] > 1} { ad_form -extend -name glossar-edit -form { - {target_id:integer(select),optional {label $target_label} {options $options}} + {target_id:integer(select),optional {label $target_label} {options $options}} } } else { ad_form -extend -name glossar-edit -form { - {target_id:text(hidden) {value ""}} + {target_id:text(hidden) {value ""}} } } @@ -80,18 +80,18 @@ set organization_p [organization::organization_p -party_id $owner_id] if {!$organization_p} { - db_1row get_rel_id {} + db_1row get_rel_id {} } if {[exists_and_not_null rel_target_id]} { - set target_id $rel_target_id + set target_id $rel_target_id } } -edit_data { set old_owner_id $owner_id if {![empty_string_p $target_id]} { - db_1row get_rel_id2 {} + db_1row get_rel_id2 {} } glossar::glossary::edit -glossar_item_id $glossar_id -title $title -description $description -source_category_id $source_category_id -target_category_id $target_category_id -owner_id $owner_id -etat_id "" @@ -101,3 +101,9 @@ ad_returnredirect "/contacts/$contact_id" ad_script_abort } + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: