X-Git-Url: http://andersk.mit.edu/gitweb/openssh.git/blobdiff_plain/30eab01dd513b1e58f1c5c63a789c9d005f29a38..ee48c949f659bfc6e753cd9c2d2d19e3263d895a:/auth-pam.c

diff --git a/auth-pam.c b/auth-pam.c
index e6bd851c..1d58b207 100644
--- a/auth-pam.c
+++ b/auth-pam.c
@@ -421,6 +421,16 @@ char **fetch_pam_environment(void)
 #endif /* HAVE_PAM_GETENVLIST */
 }
 
+void free_pam_environment(char **env)
+{
+	int i;
+
+	if (env != NULL) {
+		for (i = 0; env[i] != NULL; i++)
+			xfree(env[i]);
+	}
+}
+
 /* Print any messages that have been generated during authentication */
 /* or account checking to stderr */
 void print_pam_messages(void)