Changeset 5421

Timestamp:

06/20/09 10:32:02 (3 years ago)

Author:

azawawi

Message:

[Perl 6] Removed Fix POD quick fix as it has too many scenarios...

File:

• trunk/Padre-Plugin-Perl6/lib/Padre/Plugin/Perl6/Perl6Document.pm (modified) (1 diff)

trunk/Padre-Plugin-Perl6/lib/Padre/Plugin/Perl6/Perl6Document.pm

@@ -324 +324 @@
                 $comment_error_action = 1;
             
-            } elsif($issue_msg =~ /^\=begin\s+(.+?)\s+without matching \=end/i) {
-
-                Wx::Event::EVT_MENU(
-                    $main, 
-                    $menu->Append( -1, Wx::gettext("Fix POD") ),
-                    sub { 
-                        #XXX-implement Fix POD
-                    },
-                );
-                $comment_error_action = 1;
-            
             }