diff options
| author | fukachan <fukachan> | 2002-06-01 05:09:23 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-06-01 05:09:23 +0000 |
| commit | 65eb6df28e7506613c519744ef2977fbc06b6791 (patch) | |
| tree | cb96ae23fa4549c25661136f26ad830a6996b6b2 /fml/lib/FML/Command | |
| parent | b59bd780d2e1c055cb03dc26c8fd2a321242a0f3 (diff) | |
| download | fml8-65eb6df28e7506613c519744ef2977fbc06b6791.tar.gz fml8-65eb6df28e7506613c519744ef2977fbc06b6791.tar.bz2 fml8-65eb6df28e7506613c519744ef2977fbc06b6791.zip | |
nuke white spaces \s*$
Diffstat (limited to 'fml/lib/FML/Command')
| -rw-r--r-- | fml/lib/FML/Command/Admin/newml.pm | 6 | ||||
| -rw-r--r-- | fml/lib/FML/Command/Auth.pm | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/fml/lib/FML/Command/Admin/newml.pm b/fml/lib/FML/Command/Admin/newml.pm index 7f868497..57ffd57b 100644 --- a/fml/lib/FML/Command/Admin/newml.pm +++ b/fml/lib/FML/Command/Admin/newml.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: newml.pm,v 1.38 2002/05/28 14:55:31 fukachan Exp $ +# $FML: newml.pm,v 1.39 2002/06/01 05:02:32 fukachan Exp $ # package FML::Command::Admin::newml; @@ -150,7 +150,7 @@ sub _install_template_files my $config = $curproc->{ config }; my $template_dir = $curproc->template_files_dir_for_newml(); my $ml_home_dir = $params->{ ml_home_dir }; - my $templ_files = + my $templ_files = $config->get_as_array_ref('newml_command_template_files'); for my $file (@$templ_files) { @@ -163,7 +163,7 @@ sub _install_template_files use FML::MTAControl; - # setup include include-ctl ... + # setup include include-ctl ... my $postfix = new FML::MTAControl { mta_type => 'postfix' }; $postfix->setup($curproc, $params); diff --git a/fml/lib/FML/Command/Auth.pm b/fml/lib/FML/Command/Auth.pm index ba456b18..2ca9b48a 100644 --- a/fml/lib/FML/Command/Auth.pm +++ b/fml/lib/FML/Command/Auth.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Auth.pm,v 1.7 2002/05/28 13:36:59 fukachan Exp $ +# $FML: Auth.pm,v 1.8 2002/06/01 04:57:51 fukachan Exp $ # package FML::Command::Auth; @@ -81,7 +81,7 @@ sub permit_anyone sub permit_admin_member_maps { my ($self, $curproc, $args, $optargs) = @_; - my $cred = $curproc->{ credential }; + my $cred = $curproc->{ credential }; my $match = $cred->is_privileged_member($curproc, $args); if ($match) { @@ -100,7 +100,7 @@ sub permit_admin_member_maps sub reject_system_accounts { my ($self, $curproc, $args, $optargs) = @_; - my $cred = $curproc->{ credential }; + my $cred = $curproc->{ credential }; my $match = $cred->match_system_accounts($curproc, $args); if ($match) { |