Commits

Herbert Breunung committed a112300

fix examples

Comments (0)

Files changed (4)

 
 N: lichtkind
 E: lichtkind@cpan.org
+P: main author
+
+N: frankes
+P: found example bugs

example/00_start.pl

 
 package App;
 use parent qw(Wx::App);
+use Wx;
 
 sub OnInit {
 	my $app   = shift;
 	1;
 }
 
+package main;
 App->new->MainLoop;

example/01_golden_button.pl

 
 package App;
 use parent qw(Wx::App);
+use Wx;
 
 sub OnInit {
 	my $app   = shift;

example/01_golden_win.pl

 
 package App;
 use parent qw(Wx::App);
+use Wx;
 
 sub OnInit {
 	my $app   = shift;