pam/pam_motd.so.pl

   1 # display args for pam_motd.so
   2
   3 $module_has_no_args = 1;        # file= arg doesn't seem to work!
   4
   5 # display_args(&service, &module, &args)
   6 sub display_module_args
   7 {
   8 print &ui_table_row($text{'motd_file'},
   9         &ui_opt_textbox("file", $_[2]->{'file'}, 40, $text{'motd_file_def'}).
  10         " ".&file_chooser_button("file"), 3);
  11 }
  12
  13 # parse_module_args(&service, &module, &args)
  14 sub parse_module_args
  15 {
  16 if ($in{'file_def'}) {
  17         delete($_[2]->{'file'});
  18         }
  19 else {
  20         $in{'file'} =~ /^\S+$/ || &error($text{'motd_efile'});
  21         $_[2]->{'file'} = $in{'file'};
  22         }
  23 }