- Merge HP-UX fixes and TCB support from Ged Lodder <lodder@yacc.com.au>

[openssh.git] / auth-pam.c

diff --git a/auth-pam.c b/auth-pam.c
index d712009c059c0bd8a18efe44e1b0552d3835805e..7362cfceeabfd80bc6ef344796e832042a665fbc 100644 (file)
--- a/auth-pam.c
+++ b/auth-pam.c
@@ -226,7 +226,11 @@ void start_pam(struct passwd *pw)
 /* Return list of PAM enviornment strings */
 char **fetch_pam_environment(void)
 {
+#ifdef HAVE_PAM_GETENVLIST
        return(pam_getenvlist((pam_handle_t *)pamh));
+#else /* HAVE_PAM_GETENVLIST */
+       return(NULL);
+#endif /* HAVE_PAM_GETENVLIST */
 }
 
 /* Print any messages that have been generated during authentication */