Changeset 10595

Timestamp:

02/07/10 07:35:50 (7 months ago)

Author:

azawawi

Message:

Perl tidy only on RegexEditor?.pm

Files:

• trunk/Padre/lib/Padre/Wx/Dialog/RegexEditor.pm (modified) (5 diffs)

trunk/Padre/lib/Padre/Wx/Dialog/RegexEditor.pm

@@ -452 +452 @@
         $self->{matched_text}->Clear;
         $self->{result_text}->Clear;
-        
+
         $self->{matched_text}->BeginTextColour(Wx::wxBLACK);
-        
+
         my $match;
         my $match_start;
@@ -477 +477 @@
         if ($@) {
                 $self->{matched_text}->BeginTextColour(Wx::wxRED);
-                $self->{matched_text}->SetValue(sprintf(Wx::gettext("Match failure in %s:  %s"), $regex, $@));
+                $self->{matched_text}->SetValue( sprintf( Wx::gettext("Match failure in %s:  %s"), $regex, $@ ) );
                 $self->{matched_text}->EndTextColour;
                 return;
@@ -484 +484 @@
         if ($warning) {
                 $self->{matched_text}->BeginTextColour(Wx::wxRED);
-                $self->{matched_text}->SetValue(sprintf(Wx::gettext("Match warning in %s:  %s"), $regex, $warning));
+                $self->{matched_text}->SetValue( sprintf( Wx::gettext("Match warning in %s:  %s"), $regex, $warning ) );
                 $self->{matched_text}->EndTextColour;
                 return;
@@ -503 +503 @@
         } else {
                 $self->{matched_text}->BeginTextColour(Wx::wxRED);
-                $self->{matched_text}->SetValue(Wx::gettext("No match"));
+                $self->{matched_text}->SetValue( Wx::gettext("No match") );
                 $self->{matched_text}->EndTextColour;
         }
@@ -518 +518 @@
                 $self->{result_text}->SetValue($result_text);
         }
-        
+
         $self->{matched_text}->EndTextColour;