Index: openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/test/Attic/xowiki-test-procs.tcl,v diff -u -r1.1.2.68 -r1.1.2.69 --- openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl 2 Feb 2022 10:30:20 -0000 1.1.2.68 +++ openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl 2 Mar 2022 10:46:48 -0000 1.1.2.69 @@ -652,7 +652,8 @@ aa_section "Create form $form_name" ########################################################### # - # Create a form with a repeated field. + # Create a form with date fields in different formats + # (date is a repeated field). # ::xowiki::test::create_form \ -last_request $request_info \ @@ -663,13 +664,14 @@ -update [subst { title "Form for miscelaneus form fields" nls_language $locale - text {

@date@

} + text {

@date@

@date2@

} text.format text/html - form {
@date@
} + form {
@date@ @date2@
} form.format text/html form_constraints { _page_order:omit _title:omit _nls_language:omit _description:omit date:date + {date2:date,format=DD_MONTH_YYYY_HH24_MI,default=2011-01-01 20:55,disabled,error_msg=__xowiki_test_errmsg} } }] aa_log "Form $form_name created" @@ -701,6 +703,8 @@ acs::test::reply_has_status_code $d 200 set response [dict get $d body] + aa_true "Page does not contain a form error for date2 field" \ + {[string first __xowiki_test_errmsg $response] == -1} acs::test::dom_html root $response { set f_id [::xowiki::test::get_object_name $root] set CSSclass [::xowiki::test::get_form_CSSclass $root] @@ -716,7 +720,7 @@ } ################################################################################ - aa_section "Edit an instance $page_name of $form_name to add 2nd repeated field" + aa_section "Edit an instance $page_name of $form_name to set the dates" ################################################################################ ::xowiki::test::edit_form_page \