Changeset 2201

Timestamp:

12/26/08 01:56:53 (3 years ago)

Author:

szabgab

Message:

add the menu name of the plugin explicitly
add about box

File:

• trunk/Padre-Plugin-CPAN/lib/Padre/Plugin/CPAN.pm (modified) (2 diffs)

trunk/Padre-Plugin-CPAN/lib/Padre/Plugin/CPAN.pm

@@ -14 +14 @@
 }
 
+sub plugin_name {
+    'CPAN';
+}
+
 sub menu_plugins_simple {
     'CPAN' => [
-        'Edit Config',    \&edit_config,
-        'Install Module', \&install_module,
+        'Edit Config',               \&edit_config,
+        'Install Module',            \&install_module,
         'Upgrade All Padre Plugins', \&upgrade_all_plugins,
+        'About',                     \&about,
     ];
 }
@@ -138 +143 @@
 }
 
+
+sub about {
+    my ($main) = @_;
+
+    my $about = Wx::AboutDialogInfo->new;
+    $about->SetName("Padre::Plugin::CPAN");
+    $about->SetDescription(
+        "Interface to install modules from CPAN\n"
+    );
+    $about->SetVersion($VERSION);
+    Wx::AboutBox( $about );
+    return;
+}
+
+
 1;
 __END__