From 03a7ed8ec5ec91d177b76158a8aa3fee26e3d24a Mon Sep 17 00:00:00 2001
From: Johan Danielsson <joda@pdc.kth.se>
Date: Mon, 9 Sep 2002 22:17:53 +0000
Subject: [PATCH] (do_524init): free principals

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@11422 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 kuser/kinit.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/kuser/kinit.c b/kuser/kinit.c
index cdf255c58..b080e74be 100644
--- a/kuser/kinit.c
+++ b/kuser/kinit.c
@@ -290,9 +290,11 @@ do_524init(krb5_context context, krb5_ccache ccache,
 	krb5_cc_get_principal(context, ccache, &client);
 	memset(&in_creds, 0, sizeof(in_creds));
 	ret = get_server(context, client, server, &in_creds.server);
+	krb5_free_principal(context, client);
 	if(ret)
 	    return ret;
 	ret = krb5_get_credentials(context, 0, ccache, &in_creds, &real_creds);
+	krb5_free_principal(context, in_creds.server);
 	if(ret)
 	    return ret;
     }