_acs-tcl__util_user_messages (private)
_acs-tcl__util_user_messages
Defined in packages/acs-tcl/tcl/test/utilities-procs.tcl
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: set _aa_export {} set body_count 1 foreach testcase_body {{ aa_section "Replacing existing messages" util_user_message -message ciao util_user_message -message ciao util_user_message -message ciao util_user_message -message miao util_user_message -message ciao util_user_message -replace -message test util_get_user_messages -multirow test_util_get_user_messages aa_equals "We have only one message" [template::multirow size test_util_get_user_messages] 1 aa_equals "Message is the last one" [template::multirow get test_util_get_user_messages 1 message] test aa_section "Quoting HTML in messages" util_user_message -html -message <div>ciao</div> util_user_message -message <div>ciao</div> util_get_user_messages -multirow test_util_get_user_messages aa_equals "We have only one message" [template::multirow size test_util_get_user_messages] 2 aa_equals "First message was NOT quoted" [template::multirow get test_util_get_user_messages 1 message] <div>ciao</div> aa_equals "Second message was quoted" [template::multirow get test_util_get_user_messages 2 message] [ns_quotehtml <div>ciao</div>] aa_section "Repeating messages" util_user_message -message ciao util_user_message -message ciao util_user_message -message ciao util_user_message -message miao util_user_message -message ciao util_get_user_messages -multirow test_util_get_user_messages aa_equals "We have 2 messages" [template::multirow size test_util_get_user_messages] 2 aa_equals "Repeated message includes a counter" [template::multirow get test_util_get_user_messages 1 message] "ciao (4)" aa_equals "Single message is unchanged" [template::multirow get test_util_get_user_messages 2 message] miao aa_section "Keeping messages" util_user_message -message ciao util_user_message -message ciao util_user_message -message ciao util_user_message -message miao util_user_message -message ciao util_get_user_messages -keep -multirow test_util_get_user_messages aa_equals "We have 2 messages" [template::multirow size test_util_get_user_messages] 2 aa_log "Creating multirow" util_get_user_messages -multirow test_util_get_user_messages aa_equals "We have 2 messages again" [template::multirow size test_util_get_user_messages] 2 }} { aa_log "Running testcase body $body_count" set ::__aa_test_indent [info level] set catch_val [catch $testcase_body msg] if {$catch_val != 0 && $catch_val != 2} { aa_log_result "fail" "util_user_messages (body $body_count): Error during execution: $msg, stack trace: \n$::errorInfo" } incr body_count }XQL Not present: Generic, PostgreSQL, Oracle