diff options
| author | fukachan <fukachan> | 2002-06-01 04:57:51 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-06-01 04:57:51 +0000 |
| commit | 64a8b0695b6b90f7d04bc04415977c4b5615fe1a (patch) | |
| tree | 5bd5d02b768b09d445ffed0ae0a691c14538deb3 /fml/lib/FML/Command | |
| parent | dba757ebc8c0425574b510aae2423f0c297288e6 (diff) | |
| download | fml8-64a8b0695b6b90f7d04bc04415977c4b5615fe1a.tar.gz fml8-64a8b0695b6b90f7d04bc04415977c4b5615fe1a.tar.bz2 fml8-64a8b0695b6b90f7d04bc04415977c4b5615fe1a.zip | |
permit_admin_member_maps() return 0 if not match
FNF-ify
Diffstat (limited to 'fml/lib/FML/Command')
| -rw-r--r-- | fml/lib/FML/Command/Auth.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/fml/lib/FML/Command/Auth.pm b/fml/lib/FML/Command/Auth.pm index 5653182b..ba456b18 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.6 2002/05/27 08:59:15 fukachan Exp $ +# $FML: Auth.pm,v 1.7 2002/05/28 13:36:59 fukachan Exp $ # package FML::Command::Auth; @@ -74,6 +74,10 @@ sub permit_anyone } +# Descriptions: permit if admin_member_maps has the sender +# Arguments: OBJ($self) OBJ($curproc) HASH_REF($args) HASH_REF($optargs) +# Side Effects: none +# Return Value: NUM sub permit_admin_member_maps { my ($self, $curproc, $args, $optargs) = @_; @@ -84,6 +88,8 @@ sub permit_admin_member_maps Log("found in admin_member_maps"); return 1; } + + return 0; } |