diff options
| author | fukachan <fukachan> | 2001-04-15 09:05:41 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-04-15 09:05:41 +0000 |
| commit | b056e3eec57177998b56689e260ecad7e90554d1 (patch) | |
| tree | dbfc57df9c4292a2784eb82864256f39fd2226fe | |
| parent | 8e1c59dd34f8f01b14cb0eccc993a69ec1eaf886 (diff) | |
| download | fml8-b056e3eec57177998b56689e260ecad7e90554d1.tar.gz fml8-b056e3eec57177998b56689e260ecad7e90554d1.tar.bz2 fml8-b056e3eec57177998b56689e260ecad7e90554d1.zip | |
nuke cred->is_member() and use curproc->permit_post()
| -rw-r--r-- | fml/lib/FML/Process/Distribute.pm | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/fml/lib/FML/Process/Distribute.pm b/fml/lib/FML/Process/Distribute.pm index 75a89f53..60000e41 100644 --- a/fml/lib/FML/Process/Distribute.pm +++ b/fml/lib/FML/Process/Distribute.pm @@ -4,7 +4,7 @@ # Copyright (C) 2000 Ken'ichi Fukamachi # All rights reserved. # -# $FML: Distribute.pm,v 1.42 2001/04/08 06:13:15 fukachan Exp $ +# $FML: Distribute.pm,v 1.43 2001/04/15 05:58:05 fukachan Exp $ # package FML::Process::Distribute; @@ -119,13 +119,8 @@ sub run $curproc->lock(); { - # user credential - my $cred = $curproc->{ credential }; - - # Q: the mail sender is a ML member? - if ($cred->is_member) { - # A: If so, we try to distribute this article. - _distribute( $curproc ); + if ($curproc->permit_post($args)) { + $curproc->_distribute($args); } } $curproc->unlock(); |