Index: openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl,v diff -u -r1.6.2.2 -r1.6.2.3 --- openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl 26 Mar 2019 09:30:56 -0000 1.6.2.2 +++ openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl 12 Apr 2019 21:36:16 -0000 1.6.2.3 @@ -69,7 +69,7 @@ tclwebtest::field find ~n class_instance_key tclwebtest::field fill [ad_generate_random_string] tclwebtest::form submit - aa_log "Add Class Form submited" + aa_log "Add Class Form submitted" tclwebtest::link follow $pretty_name @@ -101,7 +101,7 @@ tclwebtest::field find ~n "description" tclwebtest::field fill $task_description tclwebtest::form submit - aa_log "Add Task form submited" + aa_log "Add Task form submitted" set response_url [tclwebtest::response url] @@ -140,7 +140,7 @@ tclwebtest::field fill $file_name tclwebtest::form submit ~n "formbutton:ok" - aa_log "Add Task form submited" + aa_log "Add Task form submitted" set response_url [tclwebtest::response url] @@ -216,7 +216,7 @@ tclwebtest::field find ~n "upload_file" tclwebtest::field fill $file_name tclwebtest::form submit ~n "formbutton:ok" - aa_log "Edit Task form submited" + aa_log "Edit Task form submitted" set response_url [tclwebtest::response url] @@ -298,7 +298,7 @@ tclwebtest::field find ~n "description" tclwebtest::field fill $task_description tclwebtest::form submit ~n "formbutton:ok" - aa_log "Edit Task form submited" + aa_log "Edit Task form submitted" set response_url [tclwebtest::response url] @@ -372,7 +372,7 @@ tclwebtest::field find ~n "description" tclwebtest::field fill $project_description tclwebtest::form submit - aa_log "Add Task form submited" + aa_log "Add Task form submitted" set response_url [tclwebtest::response url] @@ -411,7 +411,7 @@ tclwebtest::field fill $file_name tclwebtest::form submit ~n "formbutton:ok" - aa_log "Add Task form submited" + aa_log "Add Task form submitted" set response_url [tclwebtest::response url] @@ -487,7 +487,7 @@ tclwebtest::field find ~n "upload_file" tclwebtest::field fill $file_name tclwebtest::form submit ~n "formbutton:ok" - aa_log "Edit Task form submited" + aa_log "Edit Task form submitted" set response_url [tclwebtest::response url] @@ -570,7 +570,7 @@ tclwebtest::field fill $project_description tclwebtest::form submit - aa_log "Edit Task form submited" + aa_log "Edit Task form submitted" set response_url [tclwebtest::response url] @@ -643,7 +643,7 @@ tclwebtest::field find ~n "description" tclwebtest::field fill $exam_description tclwebtest::form submit - aa_log "Add Exam form submited" + aa_log "Add Exam form submitted" set response_url [tclwebtest::response url] @@ -683,7 +683,7 @@ tclwebtest::field fill $file_name tclwebtest::form submit ~n "formbutton:ok" - aa_log "Add Task form submited" + aa_log "Add Task form submitted" set response_url [tclwebtest::response url] @@ -759,7 +759,7 @@ tclwebtest::field find ~n "upload_file" tclwebtest::field fill $file_name tclwebtest::form submit ~n "formbutton:ok" - aa_log "Edit Task form submited" + aa_log "Edit Task form submitted" set response_url [tclwebtest::response url] @@ -842,7 +842,7 @@ tclwebtest::field fill $exam_description tclwebtest::form submit - aa_log "Edit Task form submited" + aa_log "Edit Task form submitted" set response_url [tclwebtest::response url]