chiark
/
gitweb
/
~ian
/
cgi-auth-flexible.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Docs: Say that unknown divert kinds should be fatal
[cgi-auth-flexible.git]
/
tests
/
autotest
diff --git
a/tests/autotest
b/tests/autotest
index 60143a275d752a56d8772f11954c32a370f81766..2561f5667fb24e268f2a344baf996d633477a943 100755
(executable)
--- a/
tests/autotest
+++ b/
tests/autotest
@@
-48,19
+48,30
@@
proc fillformfield {value} {
}
proc submitform-expect {wanttxt} {
}
proc submitform-expect {wanttxt} {
- send "\
t\
r"
+ send "\r"
etxt "loading file"
epage $wanttxt
}
fillformfield alice
fillformfield bogus
etxt "loading file"
epage $wanttxt
}
fillformfield alice
fillformfield bogus
+send "\t"
submitform-expect "wrong password"
fillformfield alice
fillformfield sesame
submitform-expect "wrong password"
fillformfield alice
fillformfield sesame
+send "\t"
submitform-expect "ACCESSGRANTED"
etxt {path = '/Tsuffix'}
submitform-expect "ACCESSGRANTED"
etxt {path = '/Tsuffix'}
+send "/Make worms\r"
+submitform-expect "MAKING-worms"
+
+send "/Logout\r"
+submitform-expect "You have been logged out"
+
+send "B\x10/Make sponges\r"
+#submitform-expect "Something sane"
+
puts ok
puts ok