GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-19 10:29:30 +01:00
Code Issues Projects Releases Wiki Activity

Allow multiple undos on one line

Browse Source
This commit is contained in:
Pragmatic Software 2010-05-15 00:27:07 +00:00
parent 26c84fa621
commit 244e91b3fd
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
modules/ideone.pl
View File

@ -119,10 +119,11 @@ my $subcode = $code;
my $got_undo = 0; my $got_undo = 0;
my $got_sub = 0; my $got_sub = 0;
if($subcode =~ s/^\s*undo//) { while($subcode =~ s/^\s*(and)?\s*undo//) {
splice @last_code, 0, 1; splice @last_code, 0, 1;
if(not defined $last_code[0]) { if(not defined $last_code[0]) {
print "$nick: No more undos remaining.\n"; print "$nick: No more undos remaining.\n";
exit 0;
} else { } else {
$code = $last_code[0]; $code = $last_code[0];
$got_undo = 1; $got_undo = 1;