Changeset 9764 for trunk/Padre/lib/Padre/Wx/Menu/Edit.pm

Timestamp:

12/17/09 22:32:25 (2 years ago)

Author:

azawawi

Message:

Updates Changes and performed a Perl tidy

File:

• trunk/Padre/lib/Padre/Wx/Menu/Edit.pm (modified) (3 diffs)

trunk/Padre/lib/Padre/Wx/Menu/Edit.pm

@@ -39 +39 @@
         id          => Wx::wxID_UNDO,
         need_editor => 1,
-#       need        => sub {
-#           my %objects = @_;
-#           return 0 if !defined( $objects{editor} );
-#           return $objects{editor}->CanUndo;
-#       },
+
+        #       need        => sub {
+        #           my %objects = @_;
+        #           return 0 if !defined( $objects{editor} );
+        #           return $objects{editor}->CanUndo;
+        #       },
         label      => Wx::gettext('&Undo'),
         shortcut   => 'Ctrl-Z',
@@ -57 +58 @@
         id          => Wx::wxID_REDO,
         need_editor => 1,
-#       need        => sub {
-#           my %objects = @_;
-#           return 0 if !defined( $objects{editor} );
-#           return $objects{editor}->CanRedo;
-#       },
+
+        #       need        => sub {
+        #           my %objects = @_;
+        #           return 0 if !defined( $objects{editor} );
+        #           return $objects{editor}->CanRedo;
+        #       },
         label      => Wx::gettext('&Redo'),
         shortcut   => 'Ctrl-Y',
@@ -753 +755 @@
     # Handle the complex cases
     my $selection = !!( defined $text and $text ne '' );
-    $self->{undo}->Enable( $editor );
-    $self->{redo}->Enable( $editor );
+    $self->{undo}->Enable($editor);
+    $self->{redo}->Enable($editor);
     $self->{paste}->Enable($editor);