1 files changed, 4 insertions, 2 deletions

diff --git a/lib-src/pop.c b/lib-src/pop.c
index 5657df5a5d0..c4d4c26e5ef 100644
--- a/lib-src/pop.c
+++ b/lib-src/pop.c
@@ -1005,6 +1005,7 @@ socket_connection (host, flags)
   CREDENTIALS cred;
   Key_schedule schedule;
   int rem;
+  char *realhost;
 #endif /* KRB5 */
 #endif /* KERBEROS */
 
@@ -1175,8 +1176,9 @@ socket_connection (host, flags)
         }
 #else  /* ! KRB5 */       
       ticket = (KTEXT) malloc (sizeof (KTEXT_ST));
-      rem = krb_sendauth (0L, sock, ticket, "pop", hostent->h_name,
-                          (char *) krb_realmofhost (hostent->h_name),
+      realhost = strdup (hostent->h_name);
+      rem = krb_sendauth (0L, sock, ticket, "pop", realhost,
+                          (char *) krb_realmofhost (realhost),
                           (unsigned long) 0, &msg_data, &cred, schedule,
                           (struct sockaddr_in *) 0,
                           (struct sockaddr_in *) 0,