mirror of
https://github.com/pragma-/pbot.git
synced 2024-10-04 18:38:47 +02:00
Plugins/Wolfram: fix typo in comments
This commit is contained in:
parent
c3f1b62006
commit
68e8351a28
@ -18,13 +18,13 @@ use URI::Escape qw/uri_escape_utf8/;
|
|||||||
sub initialize {
|
sub initialize {
|
||||||
my ($self, %conf) = @_;
|
my ($self, %conf) = @_;
|
||||||
|
|
||||||
# add default registry entry
|
# add default registry entry for `appid`
|
||||||
$self->{pbot}->{registry}->add_default('text', 'wolfram', 'appid', '');
|
$self->{pbot}->{registry}->add_default('text', 'wolfram', 'appid', '');
|
||||||
|
|
||||||
# make registry entry private by default
|
# make `appid` registry entry private by default
|
||||||
$self->{pbot}->{registry}->set_default('wolfram', 'appid', 'private', 1);
|
$self->{pbot}->{registry}->set_default('wolfram', 'appid', 'private', 1);
|
||||||
|
|
||||||
# registry `wolfram` bot command
|
# add `wolfram` bot command
|
||||||
$self->{pbot}->{commands}->register(sub { $self->cmd_wolfram(@_) }, 'wolfram', 0);
|
$self->{pbot}->{commands}->register(sub { $self->cmd_wolfram(@_) }, 'wolfram', 0);
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -32,11 +32,11 @@ sub initialize {
|
|||||||
sub unload {
|
sub unload {
|
||||||
my ($self) = @_;
|
my ($self) = @_;
|
||||||
|
|
||||||
# unregister `wolfram` bot command
|
# remove `wolfram` bot command
|
||||||
$self->{pbot}->{commands}->unregister('wolfram');
|
$self->{pbot}->{commands}->unregister('wolfram');
|
||||||
}
|
}
|
||||||
|
|
||||||
# `wolfram` bot command
|
# the `wolfram` bot command
|
||||||
sub cmd_wolfram {
|
sub cmd_wolfram {
|
||||||
my ($self, $context) = @_;
|
my ($self, $context) = @_;
|
||||||
|
|
||||||
@ -48,10 +48,11 @@ sub cmd_wolfram {
|
|||||||
return "$context->{nick}: Registry item wolfram.appid is not set. See https://developer.wolframalpha.com/portal/myapps to get an appid.";
|
return "$context->{nick}: Registry item wolfram.appid is not set. See https://developer.wolframalpha.com/portal/myapps to get an appid.";
|
||||||
}
|
}
|
||||||
|
|
||||||
my $ua = LWP::UserAgent::Paranoid->new(agent => 'Mozilla/5.0', request_timeout => 10);
|
|
||||||
|
|
||||||
my $question = uri_escape_utf8 $context->{arguments};
|
my $question = uri_escape_utf8 $context->{arguments};
|
||||||
my $units = uri_escape_utf8 ($self->{pbot}->{users}->get_user_metadata($context->{from}, $context->{hostmask}, 'units') // 'metric');
|
my $units = uri_escape_utf8 ($self->{pbot}->{users}->get_user_metadata($context->{from}, $context->{hostmask}, 'units') // 'metric');
|
||||||
|
|
||||||
|
my $ua = LWP::UserAgent::Paranoid->new(agent => 'Mozilla/5.0', request_timeout => 10);
|
||||||
|
|
||||||
my $response = $ua->get("https://api.wolframalpha.com/v1/result?appid=$appid&i=$question&units=$units&timeout=10");
|
my $response = $ua->get("https://api.wolframalpha.com/v1/result?appid=$appid&i=$question&units=$units&timeout=10");
|
||||||
|
|
||||||
if ($response->is_success) {
|
if ($response->is_success) {
|
||||||
|
Loading…
Reference in New Issue
Block a user