Changes between Version 56 and Version 57 of PadrePluginCookbookRecipie05

Timestamp:

11/25/12 19:19:05 (6 months ago)

Author:

bowtie

Comment:

--

PadrePluginCookbookRecipie05

@@ -348 +348 @@
 
 ----
-=== about_dialog
-
-The following are from wxperl_demo.pl both work in a Plugin, chose and edit to taste.
+=== plugin_about
+
+The example is from Padre-Plugin-Git
+{{{#!perl
+#######
+# plugin_about
+#######
+sub plugin_about {
+        my $self = shift;
+
+        my $share = $self->plugin_directory_share or return;
+        my $file = File::Spec->catfile( $share, 'icons', '32x32', 'git.png' );
+        return unless -f $file;
+        return unless -r $file;
+
+        my $info = Wx::AboutDialogInfo->new;
+
+        $info->SetIcon( Wx::Icon->new( $file, Wx::wxBITMAP_TYPE_PNG ) );
+        $info->SetName('Padre::Plugin::Git');
+        $info->SetVersion($VERSION);
+        $info->SetDescription( Wx::gettext('A Simple Git interface for Padre') );
+        $info->SetCopyright('(c) 2008-2012 The Padre development team');
+        $info->SetWebSite('http://padre.perlide.org/trac/wiki/PadrePluginGit');
+        $info->AddDeveloper('Kaare Rasmussen, <kaare@cpan.org>');
+        $info->AddDeveloper('Kevin Dawson <bowtie@cpan.org>');
+
+        Wx::AboutBox($info);
+        return;
+}
+}}}
+
+Also see the following from wxperl_demo.pl both work in a Plugin, chose and edit to taste.
 
 {{{#!perl