Changeset 8585

Timestamp:

10/03/09 11:54:05 (2 years ago)

Author:

Sewi

Message:

Correct Beginner Error call

File:

• trunk/Padre/lib/Padre/Document/Perl.pm (modified) (1 diff)

trunk/Padre/lib/Padre/Document/Perl.pm

@@ -243 +243 @@
     if ( Padre->ide->config->editor_beginner ) {
         require Padre::Document::Perl::Beginner;
-        my $b = Padre::Document::Perl::Beginner->new;
+        my $b = Padre::Document::Perl::Beginner->new(
+        document => $self
+        );
         if ( $b->check( $self->text_get ) ) {
             return 1;