Commit 5c7ab74a authored by Per Cederqvist's avatar Per Cederqvist
Browse files

Use "$any" instead of "." to match any character, to avoid parsing

past newlines.
parent 6ee9dcb0
......@@ -564,7 +564,7 @@ send "1999 86 [holl "Text 3"] 2 { 0 9 2 2 } 0 { }\n"
simple_expect "=1999 4" "AI Create comment without items"
send "2200 90 4\n"
extracting_expect "=2200 (.*) 0 \\*" text_stat 1
extracting_expect "=2200 ($any*) 0 \\*" text_stat 1
# Add conf-only to text
# Add letterbox-only to text
......@@ -602,7 +602,7 @@ simple_expect "=2208 $text_stat 1 { 1 10002 7 $any_time 00000000 0 [holl "R1"] }
# Add letterbox-only to letterbox
send "2300 91 7\n"
extracting_expect "=2300 (.*) 0 \\*" conf_stat 1
extracting_expect "=2300 ($any*) 0 \\*" conf_stat 1
send "2301 93 7 0 { } 1 { 10000 00000000 0 [holl "FUBAR"] }\n"
simple_expect "%2301 49 0" "AIR: Adding system-only to letterbox (add)"
......@@ -638,7 +638,7 @@ simple_expect "=2308 $conf_stat 1 { 1 10003 7 $any_time 00000000 0 [holl "R2"] }
kom_create_conference "Conference 11" "00001000" "0 { }" "" "AIX: Create C11"
send "2400 91 11\n"
extracting_expect "=2400 (.*) 0 \\*" conf_stat 1
extracting_expect "=2400 ($any*) 0 \\*" conf_stat 1
send "2401 93 11 0 { } 1 { 10000 00000000 0 [holl "FUBAR"] }\n"
simple_expect "%2401 49 0" "AIR: Adding system-only to conf (add)"
......@@ -676,7 +676,7 @@ kom_login 5 "gazonk" 0
kom_enable 255
send "2500 94\n"
extracting_expect "=2500 (.*) 0 \\*" info_struct 1
extracting_expect "=2500 ($any*) 0 \\*" info_struct 1
send "2501 95 0 { } 1 { 10003 00000000 0 [holl "FUBAR"] }\n"
simple_expect "%2501 49 0" "AIR: Adding pers-only to system (add)"
......@@ -715,7 +715,7 @@ send "3000 86 [holl "Text 5"] 2 { 0 9 2 2 } 4 { 2000 00000000 1 [holl "SET"] 200
simple_expect "=3000 5"
send "3001 90 5\n"
extracting_expect "=3001 (.*) 4 { 1 2000 7 $any_time 01111111 1 [holl "SET"] 2 2001 7 $any_time 00000000 0 [holl "CLR"] 3 2002 7 $any_time 00000000 10 [holl "LIM"] 4 2002 7 $any_time 00000000 1 [holl "ULM"] }" text_stat 1
extracting_expect "=3001 ($any*) 4 { 1 2000 7 $any_time 01111111 1 [holl "SET"] 2 2001 7 $any_time 00000000 0 [holl "CLR"] 3 2002 7 $any_time 00000000 10 [holl "LIM"] 4 2002 7 $any_time 00000000 1 [holl "ULM"] }" text_stat 1
# Clear out the junk
......@@ -753,7 +753,7 @@ send "4000 86 [holl "Text 6"] 2 { 0 9 2 2 } 4 { 2004 00000000 0 [holl "AO"] 2006
simple_expect "=4000 6"
send "4001 90 6\n"
extracting_expect "=4001 (.*) 4 { 1 2004 7 $any_time 00000000 0 [holl "AO"] 2 2006 7 $any_time 00000000 0 [holl "UQ"] 3 2007 7 $any_time 00000000 0 [holl "PM"] 4 3000 7 $any_time 00000000 0 [holl "CT"] }" text_stat 1
extracting_expect "=4001 ($any*) 4 { 1 2004 7 $any_time 00000000 0 [holl "AO"] 2 2006 7 $any_time 00000000 0 [holl "UQ"] 3 2007 7 $any_time 00000000 0 [holl "PM"] 4 3000 7 $any_time 00000000 0 [holl "CT"] }" text_stat 1
# Try to add second one-per-person item as person A
......@@ -853,7 +853,7 @@ kom_logout
kom_login 7 "pw2" 0
send "4300 91 7\n"
extracting_expect "=4300 (.*) 1 { 1 10003 7 $any_time 00000000 0 [holl "R2"] }" conf_stat 1
extracting_expect "=4300 ($any*) 1 { 1 10003 7 $any_time 00000000 0 [holl "R2"] }" conf_stat 1
send "4301 93 7 0 { } 1 { 2005 00000000 0 [holl "SO1"] }\n"
simple_expect "%4301 49 0"
......@@ -897,7 +897,7 @@ kom_login 7 "pw2" 0
kom_create_conference "Conference 12" "00001000" "1 { 3001 00000000 0 [holl "CC1"] }"
send "4399 91 12\n"
extracting_expect "=4399 (.*)" conf_stat 1
extracting_expect "=4399 ($any*)" conf_stat 1
send "4400 93 11 0 { } 1 { 3001 00000000 0 [holl "FUBAR"] }\n"
simple_expect "%4400 49 0"
......@@ -912,7 +912,7 @@ simple_expect "=4401 $conf_stat"
kom_create_person "User 13" "pw13" "00000000" "1 { 3002 00000000 0 [holl "CP1"] }"
send "4402 91 13\n"
extracting_expect "=4402 (.*)" conf_stat 1
extracting_expect "=4402 ($any*)" conf_stat 1
send "4403 93 13 0 { } 1 { 3002 00000000 0 [holl "FUBAR"] }\n"
simple_expect "%4403 49 0"
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment