summaryrefslogtreecommitdiff
path: root/fml/lib
diff options
context:
space:
mode:
authorfukachan <fukachan>2002-07-13 13:05:09 +0000
committerfukachan <fukachan>2002-07-13 13:05:09 +0000
commitb68af404ad7617f91015e92f195424356fc987d9 (patch)
tree279736ca6254501f565ebd24d053cff64f27def6 /fml/lib
parent831714d0fedfc4188a17c1a75c38d7f8918368eb (diff)
downloadfml8-b68af404ad7617f91015e92f195424356fc987d9.tar.gz
fml8-b68af404ad7617f91015e92f195424356fc987d9.tar.bz2
fml8-b68af404ad7617f91015e92f195424356fc987d9.zip
use {add,del}{admin,user} on CGI
Diffstat (limited to 'fml/lib')
-rw-r--r--fml/lib/FML/CGI/Admin/User.pm15
-rw-r--r--fml/lib/FML/Command/Admin/MANIFEST.euc-jp6
2 files changed, 17 insertions, 4 deletions
diff --git a/fml/lib/FML/CGI/Admin/User.pm b/fml/lib/FML/CGI/Admin/User.pm
index 68074b4f..297a9a8f 100644
--- a/fml/lib/FML/CGI/Admin/User.pm
+++ b/fml/lib/FML/CGI/Admin/User.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: User.pm,v 1.9 2002/06/25 04:02:11 fukachan Exp $
+# $FML: User.pm,v 1.10 2002/07/02 03:55:21 fukachan Exp $
#
package FML::CGI::Admin::User;
@@ -49,10 +49,19 @@ sub cgi_menu
my $address_list = [];
# which address list to show at the scrolling list
- if ($comname eq 'subscribe' || $comname eq 'unsubscribe') {
+ if ($comname eq 'subscribe' ||
+ $comname eq 'adduser' ||
+ $comname eq 'useradd' ||
+ $comname eq 'unsubscribe' ||
+ $comname eq 'userdel' ||
+ $comname eq 'deluser' ) {
$address_list = $curproc->get_address_list( 'member_maps' );
}
- elsif ($comname eq 'addadmin' || $comname eq 'byeadmin') {
+ elsif ($comname eq 'addadmin' ||
+ $comname eq 'adminadd' ||
+ $comname eq 'admindel' ||
+ $comname eq 'deladmin' ||
+ $comname eq 'byeadmin' ) {
$address_list = $curproc->get_address_list( 'admin_member_maps' );
}
diff --git a/fml/lib/FML/Command/Admin/MANIFEST.euc-jp b/fml/lib/FML/Command/Admin/MANIFEST.euc-jp
index e0f63875..94bbc8cd 100644
--- a/fml/lib/FML/Command/Admin/MANIFEST.euc-jp
+++ b/fml/lib/FML/Command/Admin/MANIFEST.euc-jp
@@ -7,12 +7,16 @@
subscribe MLへの入会
(add)
+(useradd)
+(adduser)
unsubscribe MLからの脱退
(bye)
(remove)
(resign)
(signoff)
+(deluser)
+(userdel)
chaddr 登録してあるメールアドレスを変更する
@@ -44,4 +48,4 @@ help admin のヘルプファイルを取り寄せる
off メンバーの誰かを off にする
on メンバーの誰かを on にする
-$FML: MANIFEST.euc-jp,v 1.5 2002/03/23 15:23:21 fukachan Exp $
+$FML: MANIFEST.euc-jp,v 1.6 2002/04/23 09:30:42 fukachan Exp $