Check the error return from krb5_init_context(), and print an error

message if neceesary.

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

diff --git a/src/clients/klist/ChangeLog b/src/clients/klist/ChangeLog
index c245813029fa826fe38bc6c2c48bf84582c337d1..8b0051b4cf06f9ef874a13a26edc498f0ef6a930 100644 (file)
--- a/src/clients/klist/ChangeLog
+++ b/src/clients/klist/ChangeLog
@@ -1,3 +1,8 @@
+Wed Nov  6 12:02:59 1996  Theodore Ts'o  <tytso@rsts-11.mit.edu>
+
+       * klist.c (main): Check the error return from krb5_init_context(),
+               and print an error message if neceesary.
+
 Tue Sep 10 14:14:21 1996  Tom Yu  <tlyu@mit.edu>
 
        * klist.M: remove ".so man1/header.doc"

diff --git a/src/clients/klist/klist.c b/src/clients/klist/klist.c
index d4d40c3ffbd3c4463e92b7cb4d9857e2bba5c38e..c97b355a8899cf133317bbf636041a51db317dd4 100644 (file)
--- a/src/clients/klist/klist.c
+++ b/src/clients/klist/klist.c
@@ -78,12 +78,16 @@ main(argc, argv)
     int argc;
     char **argv;
 {
+    krb5_error_code retval;
     int code;
     char *name;
     int mode;
 
-    krb5_init_context(&kcontext);
-    krb5_init_ets(kcontext);
+    retval = krb5_init_context(&kcontext);
+    if (retval) {
+           com_err(argv[0], status, "while initializing krb5");
+           exit(1);
+    }
 
     progname = (strrchr(*argv, '/') ? strrchr(*argv, '/')+1 : argv[0]);