Label for regular expression errors on rule save.

This commit is contained in:
Colin Kuskie 2009-02-09 18:16:26 -08:00 committed by Patrick Donelan
parent 9a5127fb7e
commit c0adc273aa
2 changed files with 8 additions and 0 deletions

View file

@ -230,6 +230,8 @@ sub www_editRuleSave {
$session->log->warn("Error: $@");
my $error = $@;
$error =~ s/at \S+?\.pm line \d+.*$//;
my $i18n = WebGUI::International->new($session, 'PassiveAnalytics');
$error = join ' ', $i18n->get('Regular Expression Error:'), $error;
return www_editRule($session, $error);
}
my $ruleId = $form->get('ruleId');