summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJules <jules@asdf.us>2015-01-18 04:11:04 -0500
committerJules <jules@asdf.us>2015-01-18 04:11:04 -0500
commit43ccccbf6a1055d48640fed175b360655968118c (patch)
treec9b1f115b9d015cdc7e9851020ee57abfd66a767
parent97143b05493fb5e7e7c62fd4ceb09d3027ed990c (diff)
parentcb8a2d291815764d47f65687110b7d73661879d9 (diff)
Merge branch 'master' of asdf.us:xdcc
-rwxr-xr-xxdcc.pl8
1 files changed, 5 insertions, 3 deletions
diff --git a/xdcc.pl b/xdcc.pl
index 64e9ef6..f43d024 100755
--- a/xdcc.pl
+++ b/xdcc.pl
@@ -4,7 +4,7 @@ use strict;
use Irssi;
use vars qw($VERSION %IRSSI);
-$VERSION = "1.02";
+$VERSION = "1.03";
%IRSSI = (
authors => 'Julie LaLa',
@@ -59,7 +59,8 @@ People can request files from you using these commands:
/ctcp <nickname> XDCC list
/ctcp <nickname> XDCC get 1
/ctcp <nickname> XDCC batch 2-4
-/ctcp <nickname> XDCC queue
+/ctcp <nickname> XDCC remove 3
+/ctcp <nickname> XDCC help
Only one file will be sent at a time.
Additional requests are added to a queue.
@@ -189,13 +190,14 @@ sub xdcc_batch {
my ($from, $to) = split("-", $index, 2);
$from = int $from;
$to = int $to;
- if ($from > $to || $from < 1 || $to < 1 || $from > @files || $to > @files) {
+ if ($from >= $to || $from < 1 || $to < 1 || $from > @files || $to > @files) {
xdcc_message( $server, $nick, 'illegal_index' );
return;
}
for (var $i = $from; $i <= $to; $i++) {
xdcc_enqueue($server, $nick, $i);
}
+ xdcc_message($dcc->{server}, $dcc->{nick}, 'xdcc_autoget_tip');
}
sub xdcc_remove {
my ($server, $nick, $index) = @_;