Changeset 7922

Timestamp:

09/16/09 04:53:25 (2 years ago)

Author:

Sewi

Message:

Fixed a use-of-undefined-value - warning

File:

• trunk/Padre/lib/Padre/Wx/Editor.pm (modified) (2 diffs)

trunk/Padre/lib/Padre/Wx/Editor.pm

@@ -143 +143 @@
     $self->SetCodePage(65001);
 
-    my $mimetype = $self->{Document}->get_mimetype;
-    if ( $MIME_STYLE{$mimetype} ) {
+    my $mimetype = $self->{Document}->get_mimetype || 'text/plain';
+    if ($MIME_STYLE{$mimetype} ) {
         $self->padre_setup_style( $MIME_STYLE{$mimetype} );
     } elsif ( $mimetype eq 'text/plain' ) {
@@ -1088 +1088 @@
     # Workaround for Copy/Paste bug ticket #390
     my $text = $self->get_text_from_clipboard;
+
+    defined($text) or return 1;
+
     $self->ReplaceSelection($text);