diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/ASM/Commander.pm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/ASM/Commander.pm b/lib/ASM/Commander.pm index e426ed9..c4d7a00 100644 --- a/lib/ASM/Commander.pm +++ b/lib/ASM/Commander.pm @@ -22,13 +22,16 @@ my $cmdtbl = { 'flag' => 'a', 'cmd' => \&cmd_delwebuser }, '^;teredo (?<ip>\S+)' => { + 'flag' => 's', 'cmd' => \&cmd_teredo }, '^;status$' => { + 'flag' => 's', 'cmd' => \&cmd_status }, '^;mship (?<nick>\S+)' => { 'flag' => 's', 'cmd' => \&cmd_mship }, '^;source$' => { + 'flag' => 's', 'cmd' => \&cmd_source }, '^;monitor (?<chan>\S+) *$' => { 'flag' => 's', @@ -49,12 +52,16 @@ my $cmdtbl = { 'flag' => 'a', 'cmd' => \&cmd_silence2 }, '^;help$' => { + 'flag' => 's', 'cmd' => \&cmd_help }, '^;help (?<cmd>\S+)$' => { + 'flag' => 's', 'cmd' => \&cmd_help2 }, '^;db$' => { + 'flag' => 's', 'cmd' => \&cmd_db }, '^;query (\S+) ?(\S+)?$' => { + 'flag' => 's', 'cmd' => \&cmd_query }, '^;investigate (?<nick>\S+) *$' => { 'flag' => 's', @@ -66,6 +73,7 @@ my $cmdtbl = { 'flag' => 'a', 'cmd' => \&cmd_user_add }, '^;userx? flags (?<account>\S+) ?$' => { + 'flag' => 's', 'cmd' => \&cmd_user_flags }, '^;userx? flags (?<account>\S+) (?<flags>\S+)$' => { 'flag' => 'a', @@ -140,6 +148,7 @@ my $cmdtbl = { 'flag' => 'a', 'cmd' => \&cmd_sync }, '^;ping\s*$' => { + 'flag' => 's', 'cmd' => \&cmd_ping }, '^;ping (?<string>\S.*)$' => { 'flag' => 's', |