* v4gssftp.exp: Fix to handle some cases of krb4 failure prior to

	timing out.

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@12860 dc483132-0cff-0310-8789-dd5450dbe970

diff --git a/src/tests/dejagnu/krb-standalone/ChangeLog b/src/tests/dejagnu/krb-standalone/ChangeLog
index 2fa6942109b6883828d61bcc4c20f5b4be26ecbe..ac2448eae4518ad1d7ef5baeebe0f82a46e7892e 100644 (file)
--- a/src/tests/dejagnu/krb-standalone/ChangeLog
+++ b/src/tests/dejagnu/krb-standalone/ChangeLog
@@ -1,3 +1,8 @@
+2000-11-08  Tom Yu  <tlyu@mit.edu>
+
+       * v4gssftp.exp: Fix to handle some cases of krb4 failure prior to
+       timing out.
+
 Tue Aug 22 11:43:14 2000  Ezra Peisach  <epeisach@mit.edu>
 
        * v4gssftp.exp: New tests for the krb4 compatible interface to gssftp. 

diff --git a/src/tests/dejagnu/krb-standalone/v4gssftp.exp b/src/tests/dejagnu/krb-standalone/v4gssftp.exp
index f78f5e84a0442639c358b95e58e76fc283c437ed..f3f321d225cc2e97d6b2321f955c1db1d3c3ed62 100644 (file)
--- a/src/tests/dejagnu/krb-standalone/v4gssftp.exp
+++ b/src/tests/dejagnu/krb-standalone/v4gssftp.exp
@@ -192,9 +192,11 @@ proc v4ftp_test { } {
     expect {
        "Kerberos V4 authentication succeeded" { pass "ftp authentication" }
        eof     { fail "ftp authentication" ; catch "expect_after" ; return }
-       "Kerberos V4 authentication failed" { fail "ftp authentication"; 
-                                           send "quit\r"; catch "expect_after";
-       return}
+       -re "Kerberos V4 .* failed.*\r" {
+           fail "ftp authentication";
+           send "quit\r"; catch "expect_after";
+           return
+       }
     }
     expect -nocase "name ($hostname:$env(USER)): "
     send "$env(USER)\r"