3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-19 10:29:30 +01:00

Oops, adding missing $lr for if no match found the first time

This commit is contained in:
Pragmatic Software 2010-05-14 00:08:52 +00:00
parent 24740da78b
commit b1775048e0

View File

@ -97,6 +97,8 @@ sub execute_module {
while(1) { while(1) {
my ($e, $r, $p) = extract_delimited($argsbuf, "'", "[^']+"); my ($e, $r, $p) = extract_delimited($argsbuf, "'", "[^']+");
$lr = $r if not defined $lr;
if(defined $e) { if(defined $e) {
$e =~ s/\\//g; $e =~ s/\\//g;
$e =~ s/'/'\\''/g; $e =~ s/'/'\\''/g;