summaryrefslogtreecommitdiff
path: root/fml/lib/FML/Command
diff options
context:
space:
mode:
authorfukachan <fukachan>2002-04-10 09:57:22 +0000
committerfukachan <fukachan>2002-04-10 09:57:22 +0000
commitf3e294bf7606370ad100b25f0886d093823531df (patch)
tree56922fa05b4c6e32a390a4797a4c4daf8c8a5f5a /fml/lib/FML/Command
parentb36c95fca10d4feab47473cfd6f04e7783dc483d (diff)
downloadfml8-f3e294bf7606370ad100b25f0886d093823531df.tar.gz
fml8-f3e294bf7606370ad100b25f0886d093823531df.tar.bz2
fml8-f3e294bf7606370ad100b25f0886d093823531df.zip
whitespace niche
Diffstat (limited to 'fml/lib/FML/Command')
-rw-r--r--fml/lib/FML/Command/Admin/newml.pm12
-rw-r--r--fml/lib/FML/Command/Auth.pm4
-rw-r--r--fml/lib/FML/Command/UserControl.pm4
3 files changed, 10 insertions, 10 deletions
diff --git a/fml/lib/FML/Command/Admin/newml.pm b/fml/lib/FML/Command/Admin/newml.pm
index b344a8a4..711aeba5 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.22 2002/04/01 03:41:59 fukachan Exp $
+# $FML: newml.pm,v 1.23 2002/04/10 09:51:25 fukachan Exp $
#
package FML::Command::Admin::newml;
@@ -132,7 +132,7 @@ sub process
# Descriptions: install config.cf, include, include-ctl et. al.
-# Arguments: OBJ($self)
+# Arguments: OBJ($self)
# OBJ($curproc)
# HASH_REF($command_args)
# HASH_REF($params)
@@ -158,7 +158,7 @@ sub _install_template_files
# Descriptions: update aliases entry
-# Arguments: OBJ($self)
+# Arguments: OBJ($self)
# OBJ($curproc)
# HASH_REF($command_args)
# HASH_REF($params)
@@ -184,7 +184,7 @@ sub _update_aliases
# Descriptions: set up ~fml/public_html/ for this mailing list
-# Arguments: OBJ($self)
+# Arguments: OBJ($self)
# OBJ($curproc)
# HASH_REF($command_args)
# HASH_REF($params)
@@ -208,7 +208,7 @@ sub _setup_mail_archive_dir
# Descriptions: set up CGI interface for this mailing list but
# disable it by default.
-# Arguments: OBJ($self)
+# Arguments: OBJ($self)
# OBJ($curproc)
# HASH_REF($command_args)
# HASH_REF($params)
@@ -354,7 +354,7 @@ sub _install
# Descriptions: set up information for this mailing list.
-# Arguments: OBJ($self)
+# Arguments: OBJ($self)
# OBJ($curproc)
# HASH_REF($command_args)
# HASH_REF($params)
diff --git a/fml/lib/FML/Command/Auth.pm b/fml/lib/FML/Command/Auth.pm
index 601b0158..cf3b0346 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.3 2002/03/30 11:08:34 fukachan Exp $
+# $FML: Auth.pm,v 1.4 2002/04/07 12:13:02 fukachan Exp $
#
package FML::Command::Auth;
@@ -95,7 +95,7 @@ sub check_password
my $mapobj = new IO::Adapter $map;
my $addrs = $mapobj->find( $user , { want => 'key,value', all => 1 });
- # if this $map has this $user entry,
+ # if this $map has this $user entry,
# try to check { user => password } relation.
if (defined $addrs) {
PASSWORD_ENTRY:
diff --git a/fml/lib/FML/Command/UserControl.pm b/fml/lib/FML/Command/UserControl.pm
index acef9ef1..c3efe99e 100644
--- a/fml/lib/FML/Command/UserControl.pm
+++ b/fml/lib/FML/Command/UserControl.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: UserControl.pm,v 1.3 2002/04/01 12:41:40 fukachan Exp $
+# $FML: UserControl.pm,v 1.4 2002/04/07 12:13:03 fukachan Exp $
#
package FML::Command::UserControl;
@@ -58,7 +58,7 @@ sub useradd
my $cred = new FML::Credential;
unless ($cred->has_address_in_map($map, $address)) {
my $obj = new IO::Adapter $map;
- $obj->touch(); # create a new map entry (e.g. file) if needed.
+ $obj->touch(); # create a new map entry (e.g. file) if needed.
$obj->add( $address );
unless ($obj->error()) {
Log("add $address to map=$map");