From: Ezra Peisach <epeisach@mit.edu>
Date: Sat, 7 Oct 1995 12:15:03 +0000 (+0000)
Subject: Work around bug in NetBSD expect. This is the same fix as
X-Git-Tag: krb5-1.0-beta6~921
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=7c837ef565228e0172dbe2e739a0ae58e457fb9e;p=krb5.git

Work around bug in NetBSD expect. This is the same fix as
is found in gssapi.exp for dealing with AIX...

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

diff --git a/src/tests/dejagnu/krb-standalone/ChangeLog b/src/tests/dejagnu/krb-standalone/ChangeLog
index b34b3a550..e9fc30970 100644
--- a/src/tests/dejagnu/krb-standalone/ChangeLog
+++ b/src/tests/dejagnu/krb-standalone/ChangeLog
@@ -1,3 +1,7 @@
+Sat Oct  7 08:02:08 1995  Ezra Peisach  <epeisach@kangaroo.mit.edu>
+
+	* sample.exp: Make changes to deal with NetBSD expect. Similar to
+		the AIX fix in gssapi.exp
 
 Thu Aug 31 12:02:36 EDT 1995	Paul Park	(pjpark@mit.edu)
 	* gssapi.exp - Repeat tests with -v2 switch.
diff --git a/src/tests/dejagnu/krb-standalone/sample.exp b/src/tests/dejagnu/krb-standalone/sample.exp
index 6180fe928..03c5557da 100644
--- a/src/tests/dejagnu/krb-standalone/sample.exp
+++ b/src/tests/dejagnu/krb-standalone/sample.exp
@@ -120,13 +120,18 @@ proc test_sclient { msg } {
      }
 
     expect {
-	"You are krbtest/admin@KRBTEST.COM" {
+	"You are krbtest/admin@KRBTEST.COM\r" {
 		verbose "received valid sample message"}
 	eof {
 		fail $msg 
 		return 0
 	    }
     }
+    # This last expect seems useless, but without it the test hangs on
+    # NETBSD.
+    expect {
+        "\r" { }
+    }
 
     if ![check_exit_status "ssample"] {
 	return 0