From: Tom Yu <tlyu@mit.edu>
Date: Wed, 8 Nov 2000 23:17:50 +0000 (+0000)
Subject: 	* v4gssftp.exp: Fix to handle some cases of krb4 failure prior to
X-Git-Tag: krb5-1.3-alpha1~1757
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=3c59a1168382d3669ea5f1b5b116e518d5229cc5;p=krb5.git

	* 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 2fa694210..ac2448eae 100644
--- 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 f78f5e84a..f3f321d22 100644
--- 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"