use esetenv

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

appl/telnet/libtelnet/kerberos5.c

@@ -277,7 +277,6 @@ kerberos5_is(Authenticator *ap, unsigned char *data, int cnt)
     krb5_data outbuf;
     krb5_keyblock *key_block;
     char *name;
-    krb5_principal server;
     int zero = 0;
 
     if (cnt-- < 1)
@@ -312,29 +311,13 @@ kerberos5_is(Authenticator *ap, unsigned char *data, int cnt)
 	    return;
 	}
 
-	ret = krb5_sock_to_principal (context,
-				      0,
-				      "host",
-				      KRB5_NT_SRV_HST,
-				      &server);
-	if (ret) {
-	    Data(ap, KRB_REJECT, "krb5_sock_to_principal failed", -1);
-	    auth_finished(ap, AUTH_REJECT);
-	    if (auth_debug_mode)
-		printf("Kerberos V5: "
-		       "krb5_sock_to_principal failed (%s)\r\n",
-		       krb5_get_err_text(context, ret));
-	    return;
-	}
-
 	ret = krb5_rd_req(context,
 			  &auth_context,
 			  &auth, 
-			  server,
+			  NULL,
 			  NULL,
 			  NULL,
 			  &ticket);
-	krb5_free_principal (context, server);
 
 	if (ret) {
 	    char *errbuf;
@@ -477,7 +460,7 @@ kerberos5_is(Authenticator *ap, unsigned char *data, int cnt)
 	}
 
 #if defined(DCE)
-	setenv("KRB5CCNAME", ccname, 1);
+	esetenv("KRB5CCNAME", ccname, 1);
 #endif
 	ret = krb5_rd_cred (context,
 			    auth_context,
@@ -772,9 +755,9 @@ kerberos5_dfspag(void)
 {
     if (dfsk5ok) {
 	dfspag = krb5_dfs_pag(context, dfsfwd, ticket->client,
-				UserNameRequested);
+			      UserNameRequested);
     }
 }
 #endif
- 
+
 #endif /* KRB5 */