sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Stupid Git.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-19 21:04:18 -07:00
1 parent 24ab4aaf9a
commit 6a7cf754cc
2 files changed
+2 -4
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

modules/EightBall.pm
+1 -1
View File
@@ -13,7 +13,7 @@ our $ANSWER = 0;
sub _init sub _init
{ {
# Create the 8BALL and RIGBALL commands. # Create the 8BALL and RIGBALL commands.
cmd_add('8BALL', 3, 0, \%M::EightBall::HELP_8BALL, \&M::EightBall::c_8ball) or return 0; cmd_add('8BALL', 0, 0, \%M::EightBall::HELP_8BALL, \&M::EightBall::c_8ball) or return 0;
cmd_add('RIGBALL', 1, 'cmd.rigball', \%M::EightBall::HELP_RIGBALL, \&M::EightBall::rigball) or return 0; cmd_add('RIGBALL', 1, 'cmd.rigball', \%M::EightBall::HELP_RIGBALL, \&M::EightBall::rigball) or return 0;
# Success. # Success.
modules/LinkTitle.pm
+1 -3
View File
@@ -4,7 +4,7 @@
package M::LinkTitle; package M::LinkTitle;
use strict; use strict;
use warnings; use warnings;
#use LWP::UserAgent; use LWP::UserAgent;
use HTML::Entities; use HTML::Entities;
use API::Std qw(hook_add hook_del); use API::Std qw(hook_add hook_del);
use API::IRC qw(privmsg); use API::IRC qw(privmsg);
@@ -40,7 +40,6 @@ sub gettitle
# We've got a match, connect to the server. # We've got a match, connect to the server.
my $srv = $1; my $srv = $1;
# Create an instance of LWP::UserAgent. # Create an instance of LWP::UserAgent.
require LWP::UserAgent;
my $ua = LWP::UserAgent->new(); my $ua = LWP::UserAgent->new();
$ua->agent('Auto IRC Bot'); $ua->agent('Auto IRC Bot');
$ua->timeout(3); $ua->timeout(3);
@@ -60,7 +59,6 @@ sub gettitle
privmsg($src->{svr}, $chan, "\2Title:\2 $title"); privmsg($src->{svr}, $chan, "\2Title:\2 $title");
} }
} }
Class::Unload->unload('LWP::UserAgent');
} }
} }