Changeset 5412

Timestamp:

06/20/09 06:06:49 (3 years ago)

Author:

azawawi

Message:

[Perl 6] Quick fix for obsolete use of C++ constructor syntax

File:

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

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

@@ -263 +263 @@
                 $comment_error_action = 1;
             
+            } elsif($issue_msg =~ /^Obsolete use of C++ constructor syntax/i) {
+
+                Wx::Event::EVT_MENU(
+                    $main, 
+                    $menu->Append( -1, Wx::gettext("Use Perl 6 constructor syntax") ),
+                    sub { 
+                        #XXX-implement Use Perl 6 constructor syntax
+                    },
+                );
+                $comment_error_action = 1;
+            
             }