diff options
| author | Barry Jaspan <bjaspan@mit.edu> | 1996-11-14 20:20:43 +0000 |
|---|---|---|
| committer | Barry Jaspan <bjaspan@mit.edu> | 1996-11-14 20:20:43 +0000 |
| commit | 2fabbb429cac7f52d1ac60562520d9404cf222d5 (patch) | |
| tree | 4d13a4d31a35ac169ee6870389eb0ab66e3ca77d /src | |
| parent | 587f386fb7a06f2e9b5115dcd208a6fc0d1f5b2f (diff) | |
| download | krb5-2fabbb429cac7f52d1ac60562520d9404cf222d5.tar.gz krb5-2fabbb429cac7f52d1ac60562520d9404cf222d5.tar.xz krb5-2fabbb429cac7f52d1ac60562520d9404cf222d5.zip | |
* telnet.exp: telnet may output fqdn in upper-case
git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@9415 dc483132-0cff-0310-8789-dd5450dbe970
Diffstat (limited to 'src')
| -rw-r--r-- | src/tests/dejagnu/krb-root/ChangeLog | 4 | ||||
| -rw-r--r-- | src/tests/dejagnu/krb-root/telnet.exp | 4 |
2 files changed, 7 insertions, 1 deletions
diff --git a/src/tests/dejagnu/krb-root/ChangeLog b/src/tests/dejagnu/krb-root/ChangeLog index 1b48d50fc..3744efdf8 100644 --- a/src/tests/dejagnu/krb-root/ChangeLog +++ b/src/tests/dejagnu/krb-root/ChangeLog @@ -1,3 +1,7 @@ +Thu Nov 14 15:20:19 1996 Barry Jaspan <bjaspan@mit.edu> + + * telnet.exp: telnet may output fqdn in upper-case + Mon Nov 11 20:53:38 1996 Mark Eichin <eichin@cygnus.com> Tue Sep 17 18:30:57 1996 Ken Raeburn <raeburn@cygnus.com> diff --git a/src/tests/dejagnu/krb-root/telnet.exp b/src/tests/dejagnu/krb-root/telnet.exp index d3244ebaf..9035a1257 100644 --- a/src/tests/dejagnu/krb-root/telnet.exp +++ b/src/tests/dejagnu/krb-root/telnet.exp @@ -183,8 +183,10 @@ proc telnet_test { } { set testname "telnet status" send "status\r" + # use -nocase because telnet may output the fqdn in upper-case; + # however, -nocase requires the whole pattern to be in lower case expect { - -re "Connected to $localhostname.*Operating in single character mode.*Catching signals locally.*Remote character echo.*flow control.*Escape character is '.\]'" { + -nocase -re "connected to $localhostname.*operating in single character mode.*catching signals locally.*remote character echo.*flow control.*escape character is '.\]'" { pass $testname } } |