Improved QDB. Also, You can now define how many results are returned by QDB SEARCH/MORE at a time with qdb_search_resnum in the config.

This commit is contained in:
Elijah Perrault committed 2011-02-19 21:02:31 -07:00
1 parent 9ff384866e
commit 24ab4aaf9a
5 files changed
+16 -7

No files matched your search

+3 -1
View File
@@ -4,7 +4,7 @@
package M::LinkTitle;
use strict;
use warnings;
use LWP::UserAgent;
#use LWP::UserAgent;
use HTML::Entities;
use API::Std qw(hook_add hook_del);
use API::IRC qw(privmsg);
@@ -40,6 +40,7 @@ sub gettitle
# We've got a match, connect to the server.
my $srv = $1;
# Create an instance of LWP::UserAgent.
require LWP::UserAgent;
my $ua = LWP::UserAgent->new();
$ua->agent('Auto IRC Bot');
$ua->timeout(3);
@@ -59,6 +60,7 @@ sub gettitle
privmsg($src->{svr}, $chan, "\2Title:\2 $title");
}
}
Class::Unload->unload('LWP::UserAgent');
}
}