Updated Calc to obey new command API.

This commit is contained in:
Elijah Perrault committed 2011-02-15 21:50:53 -07:00
1 parent 795c1da38d
commit 42b58c73e9
1 file changed
+5 -6
+5 -6
View File
@@ -43,7 +43,7 @@ our %FHELP_CALC = (
# Callback for CALC command. # Callback for CALC command.
sub calc sub calc
{ {
my (%data) = @_; my ($src, @args) = @_;
# Create an instance of LWP::UserAgent. # Create an instance of LWP::UserAgent.
my $ua = LWP::UserAgent->new(); my $ua = LWP::UserAgent->new();
@@ -52,9 +52,8 @@ sub calc
# Create an instance of JSON. # Create an instance of JSON.
my $json = JSON->new(); my $json = JSON->new();
# Put together the call to the Google Calculator API. # Put together the call to the Google Calculator API.
my @args = @{ $data{args} };
if (!defined $args[0]) { if (!defined $args[0]) {
notice($data{svr}, $data{nick}, trans("Not enough parameters")."."); notice($src->{svr}, $src->{nick}, trans("Not enough parameters").".");
return 0; return 0;
} }
my $expr = join(' ', @args); my $expr = join(' ', @args);
@@ -68,16 +67,16 @@ sub calc
if ($d->{error} eq "" or $d->{error} == 0) { if ($d->{error} eq "" or $d->{error} == 0) {
# And send to channel # And send to channel
privmsg($data{svr}, $data{chan}, "Result: ".$d->{lhs}." = ".$d->{rhs}); privmsg($src->{svr}, $src->{chan}, "Result: ".$d->{lhs}." = ".$d->{rhs});
} }
else { else {
# Otherwise, send an error message. # Otherwise, send an error message.
privmsg($data{svr}, $data{chan}, "Google Calculator sent an error."); privmsg($src->{svr}, $src->{chan}, "Google Calculator sent an error.");
} }
} }
else { else {
# Otherwise, send an error message. # Otherwise, send an error message.
privmsg($data{svr}, $data{chan}, "An error occurred while sending your expression to Google Calculator."); privmsg($src->{svr}, $src->{chan}, "An error occurred while sending your expression to Google Calculator.");
} }
return 1; return 1;