From 14f2ccaa90a00b2317016ef4daf0e00f23d1a5b5 Mon Sep 17 00:00:00 2001 From: William Heimbigner Date: Wed, 24 Dec 2008 20:22:42 +0000 Subject: Checking to see what flags a user has no longer requires 'a' --- config-default/commands.xml | 27 ++++++++++++++------------- 1 file changed, 14 insertions(+), 13 deletions(-) diff --git a/config-default/commands.xml b/config-default/commands.xml index f9abcc5..3dba162 100644 --- a/config-default/commands.xml +++ b/config-default/commands.xml @@ -41,7 +41,17 @@ $conn->privmsg($event->{to}->[0], "Hiya $nick"); ]]> - + + {person}->{$nick}->{flags})) { + $conn->privmsg($event->{to}->[0], "Flags for $nick: $::users->{person}->{$nick}->{flags}"); + } else { + $conn->privmsg($event->{to}->[0], "$nick has no flags"); + } + ]]> + + privmsg($event->{to}->[0], "The d flag may not be assigned over IRC. Edit the configuration manually."); return; } - if ((!defined($flags)) || ($flags eq '')) { - if (defined($::users->{person}->{$nick}->{flags})) { - $conn->privmsg($event->{to}->[0], "Flags for $nick: $::users->{person}->{$nick}->{flags}"); - } else { - $conn->privmsg($event->{to}->[0], "$nick has no flags"); - } -# delete($::users->{person}->{$nick}->{flags}); - } else { - $::users->{person}->{$nick}->{flags} = $flags; - ASM::XML->writeUsers(); - $conn->privmsg($event->{to}->[0], "Flags for $nick set to $flags"); - } + $::users->{person}->{$nick}->{flags} = $flags; + ASM::XML->writeUsers(); + $conn->privmsg($event->{to}->[0], "Flags for $nick set to $flags"); ]]> -- cgit v1.2.3