diff --git a/kdc/kerberos4.c b/kdc/kerberos4.c
index a78b0e164..b28e50b5f 100644
--- a/kdc/kerberos4.c
+++ b/kdc/kerberos4.c
@@ -214,10 +214,10 @@ _kdc_do_version4(krb5_context context,
 	    goto out1;
 	}
 
-	ret = _kdc_check_flags (context, config,
-				client, client_name,
-				server, server_name,
-				TRUE);
+	ret = kdc_check_flags (context, config,
+			       client, client_name,
+			       server, server_name,
+			       TRUE);
 	if (ret) {
 	    /* good error code? */
 	    make_err_reply(context, reply, KRB4ET_KDC_NAME_EXP,
@@ -499,10 +499,10 @@ _kdc_do_version4(krb5_context context,
 	    goto out2;
 	}
 
-	ret = _kdc_check_flags (context, config,
-				client, client_name,
-				server, server_name,
-				FALSE);
+	ret = kdc_check_flags (context, config,
+			       client, client_name,
+			       server, server_name,
+			       FALSE);
 	if (ret) {
 	    make_err_reply(context, reply, KRB4ET_KDC_NAME_EXP,
 			   "operation not allowed");