From 50c38a1e56fec888659374507ca490d74a9907a3 Mon Sep 17 00:00:00 2001
From: Assar Westerlund <assar@sics.se>
Date: Tue, 5 Aug 1997 20:55:05 +0000
Subject: [PATCH] make `krb5_password_key_proc' global

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@2706 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/krb5/get_in_tkt_pw.c | 27 ++++++++++++++++++---------
 1 file changed, 18 insertions(+), 9 deletions(-)

diff --git a/lib/krb5/get_in_tkt_pw.c b/lib/krb5/get_in_tkt_pw.c
index 1a6f14aa6..917821d5b 100644
--- a/lib/krb5/get_in_tkt_pw.c
+++ b/lib/krb5/get_in_tkt_pw.c
@@ -40,12 +40,12 @@
 
 RCSID("$Id$");
 
-static krb5_error_code
-key_proc (krb5_context context,
-	  krb5_keytype type,
-	  krb5_data *salt,
-	  krb5_const_pointer keyseed,
-	  krb5_keyblock **key)
+krb5_error_code
+krb5_password_key_proc (krb5_context context,
+			krb5_keytype type,
+			krb5_data *salt,
+			krb5_const_pointer keyseed,
+			krb5_keyblock **key)
 {
      krb5_error_code ret;
      char *password = (char *)keyseed;
@@ -77,7 +77,16 @@ krb5_get_in_tkt_with_password (krb5_context context,
 			       krb5_creds *creds,
 			       krb5_kdc_rep *ret_as_reply)
 {
-     return krb5_get_in_tkt (context, options, addrs, etypes,
-			     pre_auth_types, key_proc, password,
-			     NULL, NULL, creds, ccache, ret_as_reply);
+     return krb5_get_in_tkt (context,
+			     options,
+			     addrs,
+			     etypes,
+			     pre_auth_types,
+			     krb5_password_key_proc,
+			     password,
+			     NULL,
+			     NULL,
+			     creds,
+			     ccache,
+			     ret_as_reply);
 }