Changeset 10638

Timestamp:

02/09/10 04:51:54 (2 years ago)

Author:

kthakore

Message:

Was getting an error when runing a script with a error in it. Can't locate object method errorlist via package Padre::Wx::App at /usr/local/share/perl/5.10.0/Padre/Task/ErrorParser.pm line 39.

'

File:

• trunk/Padre/lib/Padre/Task/ErrorParser.pm (modified) (1 diff)

trunk/Padre/lib/Padre/Task/ErrorParser.pm

@@ -40 +40 @@
     my $data      = $self->data;
     my $parser    = $self->parser;
-    $errorlist->{parser} = $parser;
+    $errorlist->{parser} = $parser if $errorlist;
 
     my @errors = defined $data && $data ne '' ? $parser->parse_string($data) : ();