* kadmin.exp: test that kadmin_modify doesn't corrupt key entries

(I think proven's changes fix this, but this will help keep it fixed.)

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

diff --git a/src/tests/dejagnu/krb-standalone/ChangeLog b/src/tests/dejagnu/krb-standalone/ChangeLog
index e9fc309701ca24767c76995cc36633fb64337c8f..d01c3e9ac6de79d324fd3a96fa834f24e7152da1 100644 (file)
--- a/src/tests/dejagnu/krb-standalone/ChangeLog
+++ b/src/tests/dejagnu/krb-standalone/ChangeLog
@@ -1,3 +1,7 @@
+Wed Dec 13 15:28:17 1995  Mark Eichin  <eichin@cygnus.com>
+
+       * kadmin.exp: test that kadmin_modify doesn't corrupt key entries.
+
 Sat Oct  7 08:02:08 1995  Ezra Peisach  <epeisach@kangaroo.mit.edu>
 
        * sample.exp: Make changes to deal with NetBSD expect. Similar to

diff --git a/src/tests/dejagnu/krb-standalone/kadmin.exp b/src/tests/dejagnu/krb-standalone/kadmin.exp
index 3cd9fec8c3d8400ffae27c4ceceff8fc69af47ec..dd98854fb7a8d5b635e27f246c3d08651f2cacfb 100644 (file)
--- a/src/tests/dejagnu/krb-standalone/kadmin.exp
+++ b/src/tests/dejagnu/krb-standalone/kadmin.exp
@@ -746,6 +746,16 @@ proc kadmin_test { } {
            || ![kadmin_delete testprinc1/instance]} {
        return
     }
+    # now test modify changes.
+    if {![kadmin_add testuser testpw] \
+            || ![kinit testuser testpw 0] \
+           || ![kdestroy] \
+           || ![kadmin_modify testuser maxlife=2500] \
+           || ![kinit testuser testpw 0] \
+           || ![kdestroy] \
+           || ![kadmin_delete testuser]} {
+       return
+    }
 
     verbose "kadmin_test succeeded"
 }