(AES_string_to_key): fix memory leak

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@13135 ec53bebd-3082-4978-b11e-865c3cabbd6b

lib/krb5/crypto.c

@@ -662,10 +662,8 @@ AES_string_to_key(krb5_context context,
     kd.schedule = NULL;
 
     ret = derive_key(context, et, &kd, "kerberos", strlen("kerberos"));
-
-    if (ret) {
-	krb5_data_free(&key->keyvalue);
-    } else {
+    krb5_free_keyblock_contents(context, key);
+    if (ret == 0) {
 	ret = krb5_copy_keyblock_contents(context, kd.key, key);
 	free_key_data(context, &kd);
     }