#!/usr/bin/perl
# Link PAM LDAP file to NSS file

require './ldap-client-lib.pl';
&ReadParse();

if ($in{'ignore'}) {
	# Don't show message anymore
	$config{'nofixpam'} = 1;
	&save_module_config();
	}
else {
	# Fix up
	&unlink_logged($config{'pam_ldap'});
	&symlink_logged(&get_ldap_config_file(), $config{'pam_ldap'});
	&webmin_log("fixpam");
	}
&redirect("");