use $curproc->config(), pcb() not { config }, { pcb } respectively.

8 files changed, 17 insertions, 17 deletions

diff --git a/fml/lib/FML/Command/User/chaddr.pm b/fml/lib/FML/Command/User/chaddr.pm
index 7a7c254b..dcf58f54 100644
--- a/fml/lib/FML/Command/User/chaddr.pm
+++ b/fml/lib/FML/Command/User/chaddr.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: chaddr.pm,v 1.20 2003/08/23 04:35:32 fukachan Exp $
+# $FML: chaddr.pm,v 1.21 2003/08/23 07:24:43 fukachan Exp $
 #
 
 package FML::Command::User::chaddr;
@@ -73,7 +73,7 @@ sub lock_channel { return 'command_serialize';}
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
-    my $config        = $curproc->{ config };
+    my $config        = $curproc->config();
 
     #
     # XXX-TODO: correct to use *_maps not primary_*_map for chaddr?
diff --git a/fml/lib/FML/Command/User/confirm.pm b/fml/lib/FML/Command/User/confirm.pm
index 18c00da4..628d0afc 100644
--- a/fml/lib/FML/Command/User/confirm.pm
+++ b/fml/lib/FML/Command/User/confirm.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: confirm.pm,v 1.22 2003/08/23 04:35:33 fukachan Exp $
+# $FML: confirm.pm,v 1.23 2003/08/23 07:24:43 fukachan Exp $
 #
 
 package FML::Command::User::confirm;
@@ -66,7 +66,7 @@ sub lock_channel { return 'command_serialize';}
 sub notice_cc_recipient
 {
    my ($self, $curproc, $command_args) = @_;
-   my $config     = $curproc->{ config };
+   my $config     = $curproc->config();
    my $maintainer = $config->{ maintainer };
 
    return [ $maintainer ];
@@ -81,7 +81,7 @@ sub notice_cc_recipient
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
-    my $config        = $curproc->{ config };
+    my $config        = $curproc->config();
 
     # XXX-TODO: correct we handle only primary_*_map here?
     my $member_map    = $config->{ primary_member_map };
diff --git a/fml/lib/FML/Command/User/digest.pm b/fml/lib/FML/Command/User/digest.pm
index cdb9a227..3374640d 100644
--- a/fml/lib/FML/Command/User/digest.pm
+++ b/fml/lib/FML/Command/User/digest.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: digest.pm,v 1.6 2003/08/23 04:35:33 fukachan Exp $
+# $FML: digest.pm,v 1.7 2003/08/23 07:24:44 fukachan Exp $
 #
 
 package FML::Command::User::digest;
@@ -68,7 +68,7 @@ sub lock_channel { return 'command_serialize';}
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
-    my $config        = $curproc->{ config };
+    my $config        = $curproc->config();
 
     #
     # XXX-TODO: correct to use primary_*_map for chaddr ?
diff --git a/fml/lib/FML/Command/User/off.pm b/fml/lib/FML/Command/User/off.pm
index 70bd2d90..f5a13769 100644
--- a/fml/lib/FML/Command/User/off.pm
+++ b/fml/lib/FML/Command/User/off.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: off.pm,v 1.9 2003/08/23 04:35:33 fukachan Exp $
+# $FML: off.pm,v 1.10 2003/08/23 07:24:44 fukachan Exp $
 #
 
 package FML::Command::User::off;
@@ -70,7 +70,7 @@ sub lock_channel { return 'command_serialize';}
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
-    my $config        = $curproc->{ config };
+    my $config        = $curproc->config();
 
     #
     # XXX-TODO: correct to use primary_*_map for on/off ?
diff --git a/fml/lib/FML/Command/User/on.pm b/fml/lib/FML/Command/User/on.pm
index f9b7695c..3703eb4f 100644
--- a/fml/lib/FML/Command/User/on.pm
+++ b/fml/lib/FML/Command/User/on.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: on.pm,v 1.9 2003/08/23 04:35:33 fukachan Exp $
+# $FML: on.pm,v 1.10 2003/08/23 07:24:44 fukachan Exp $
 #
 
 package FML::Command::User::on;
@@ -70,7 +70,7 @@ sub lock_channel { return 'command_serialize';}
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
-    my $config        = $curproc->{ config };
+    my $config        = $curproc->config();
 
     #
     # XXX-TODO: correct to use primary_*_map for on/off ?
diff --git a/fml/lib/FML/Command/User/subscribe.pm b/fml/lib/FML/Command/User/subscribe.pm
index 68cd28dc..370db4cc 100644
--- a/fml/lib/FML/Command/User/subscribe.pm
+++ b/fml/lib/FML/Command/User/subscribe.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: subscribe.pm,v 1.20 2003/08/23 04:35:33 fukachan Exp $
+# $FML: subscribe.pm,v 1.21 2003/08/23 07:24:44 fukachan Exp $
 #
 
 package FML::Command::User::subscribe;
@@ -70,7 +70,7 @@ sub lock_channel { return 'command_serialize';}
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
-    my $config        = $curproc->{ config };
+    my $config        = $curproc->config();
 
     # XXX we handle primary_* . o.k.
     my $member_map    = $config->{ primary_member_map };
diff --git a/fml/lib/FML/Command/User/summary.pm b/fml/lib/FML/Command/User/summary.pm
index 9233e589..785235e0 100644
--- a/fml/lib/FML/Command/User/summary.pm
+++ b/fml/lib/FML/Command/User/summary.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: summary.pm,v 1.14 2003/03/18 10:52:34 fukachan Exp $
+# $FML: summary.pm,v 1.15 2003/08/23 04:35:33 fukachan Exp $
 #
 
 package FML::Command::User::summary;
@@ -70,7 +70,7 @@ sub lock_channel { return 'article_spool_modify';}
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
-    my $config       = $curproc->{ config };
+    my $config       = $curproc->config();
     my $summary_file = $config->{ "summary_file" };
 
     if (-f $summary_file) {
diff --git a/fml/lib/FML/Command/User/unsubscribe.pm b/fml/lib/FML/Command/User/unsubscribe.pm
index b771333d..d9e9123e 100644
--- a/fml/lib/FML/Command/User/unsubscribe.pm
+++ b/fml/lib/FML/Command/User/unsubscribe.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: unsubscribe.pm,v 1.20 2003/08/23 04:35:33 fukachan Exp $
+# $FML: unsubscribe.pm,v 1.21 2003/08/23 07:24:44 fukachan Exp $
 #
 
 package FML::Command::User::unsubscribe;
@@ -69,7 +69,7 @@ sub lock_channel { return 'command_serialize';}
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
-    my $config        = $curproc->{ config };
+    my $config        = $curproc->config();
 
     # XXX-TODO: wrong to handle only primary_*_map in deluser phase.
     # XXX-TODO: we should check all maps?