Skip to content

Commit

Permalink
spelling and style fixes
Browse files Browse the repository at this point in the history
git-svn-id: http://svn.perlide.org/padre/trunk/Padre@7391 bc93166f-e056-4eb9-8c59-0a0840647e1b
  • Loading branch information
daxim committed Aug 19, 2009
1 parent f3fbf47 commit 8511ee5
Show file tree
Hide file tree
Showing 3 changed files with 7 additions and 7 deletions.
4 changes: 2 additions & 2 deletions lib/Padre/Perl.pm
Original file line number Diff line number Diff line change
Expand Up @@ -32,7 +32,7 @@ a command line environment.
On Microsoft Windows F<perl.exe> is the command line Perl binary and
F<wperl.exe> is the windowing Perl binary.
On Mac OSX (Darwin) F<perl.exe> is the command line Perl binary and
On Mac OS X (Darwin) F<perl.exe> is the command line Perl binary and
F<wxPerl.exe> is a wxWidgets-specific Perl binary.
=head2 PAR Support
Expand Down Expand Up @@ -159,7 +159,7 @@ The C<wxperl> function is a Perl executable location function that
specifically tries to find a windowing Perl for running wxWidgets
applications. In some situations you may critically need a wxWidgets
Perl so that a command line box is not show (Windows) or so that Wx
starts up properly at all (Mac OSX).
starts up properly at all (Mac OS X).
Returns a path to a perl suitable for the execution of L<Wx>-based
applications, or C<undef> if one cannot be found.
Expand Down
2 changes: 1 addition & 1 deletion privlib/Tools.pm
Original file line number Diff line number Diff line change
Expand Up @@ -19,7 +19,7 @@ sub get_perl {
require Padre::Perl;
my $perl = Padre::Perl::wxperl();
unless ( -e $perl ) {
error("padre needs to run using wxPerl on OSX");
error("padre needs to run using wxPerl on OS X");
}
return $perl;
}
Expand Down
8 changes: 4 additions & 4 deletions script/padre
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
#!/usr/bin/perl
#!/usr/bin/perl

use 5.008005;
use strict;
Expand All @@ -13,15 +13,15 @@ if ($ENV{PADRE_DIE}) {
$SIG{__DIE__} = sub { print STDERR Carp::longmess "\nDIE: @_\n" . ("-" x80) . "\n" };
}

# Must run using wxPerl on OSX.
# Must run using wxPerl on OS X.
if ( $^O eq 'darwin' and $^X !~ m{/wxPerl\.app/} ) {
my $perl = scalar File::Which::which('wxPerl');
chomp($perl);
if ( -e $perl ) {
warn "spawning 'wxPerl' interpreter for OSX\n";
warn "spawning 'wxPerl' interpreter for OS X\n";
system( $perl, '-S', $0, @ARGV );
} else {
warn "padre cannot find wxPerl executable (which it requires on OSX)\n" ;
warn "padre cannot find wxPerl executable (which it requires on OS X)\n" ;
}
exit 0;
}
Expand Down

0 comments on commit 8511ee5

Please sign in to comment.