1# display args for pam_shells.so.pl
2
3# display_args(&service, &module, &args)
4sub display_module_args
5{
6local $file = "/etc/shells";
7print &ui_table_row($text{'shells_shells'},
8	&ui_textarea("shells", &read_file_contents($file), 5, 40), 3);
9}
10
11# parse_module_args(&service, &module, &args)
12sub parse_module_args
13{
14local $file = "/etc/shells";
15&lock_file($file);
16&open_tempfile(FILE, ">$file");
17$in{'shells'} =~ s/\r//g;
18$in{'shells'} =~ s/\s*$/\n/;
19&print_tempfile(FILE, $in{'shells'});
20&close_tempfile(FILE);
21&unlock_file($file);
22}
23