Changeset 10611 for trunk/Padre/lib/Padre/Wx/Main.pm

Timestamp:

02/08/10 00:07:56 (2 years ago)

Author:

azawawi

Message:

Refactored OpenInFileBrowserAction? to support "Open with default System Editor" feature on KDE/GNOME unix platforms

File:

• trunk/Padre/lib/Padre/Wx/Main.pm (modified) (1 diff)

trunk/Padre/lib/Padre/Wx/Main.pm

@@ -3667 +3667 @@
 =head3 C<on_open_with_default_system_editor>
 
-    $main->on_open_with_default_system_editor;
-
-Opens the current document in the default system editor
+    $main->on_open_with_default_system_editor($filename);
+
+Opens C<$filename> in the default system editor
 
 =cut
 
 sub on_open_with_default_system_editor {
-    my $self = shift;
-    my $document = $self->current->document or return;
-    my $filename = $document->filename;
-
-    unless( $filename ) {
-        $self->error( Wx::gettext("No filename") );
-        return;
-    }
-
-    if(Padre::Constant::WIN32) {
-        # Win32
-        require Padre::Util::Win32;
-        Padre::Util::Win32::ExecuteProcessAndWait(
-            directory  => $self->{cwd},
-            file       => $document->filename,
-            parameters => '',
-            show       => 1);
-    } else {
-        #TODO please implement for other platforms
-        $self->error(Wx::gettext("Not implemented!"));
-    }
+    my ( $self, $filename ) = @_;
+
+    require Padre::Wx::Directory::OpenInFileBrowserAction;
+    Padre::Wx::Directory::OpenInFileBrowserAction->new->open_with_default_system_editor($filename);
 }