diff options
| author | Peter J. Acklam) (via RT <perlbug-followup@perl.org> | 2011-01-06 23:12:42 -0800 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2011-01-07 11:29:08 +0100 |
| commit | c4a6f826b3676d1fdbd9972a9d0a8f11c02d003d (patch) | |
| tree | f246b362bc76c9dac721de18db8432c7b4bdc937 /dist/Safe | |
| parent | 2a467c83e2ce01bdf8cdda501e2e3df4b188134f (diff) | |
| download | perl-c4a6f826b3676d1fdbd9972a9d0a8f11c02d003d.tar.gz | |
Fix typos (spelling errors) in dist/*
# New Ticket Created by (Peter J. Acklam)
# Please include the string: [perl #81888]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=81888 >
Signed-off-by: Abigail <abigail@abigail.be>
Diffstat (limited to 'dist/Safe')
| -rw-r--r-- | dist/Safe/t/safe1.t | 2 | ||||
| -rw-r--r-- | dist/Safe/t/safe2.t | 4 | ||||
| -rw-r--r-- | dist/Safe/t/safeuniversal.t | 4 |
3 files changed, 5 insertions, 5 deletions
diff --git a/dist/Safe/t/safe1.t b/dist/Safe/t/safe1.t index 385d6610c5..22fb5638fa 100644 --- a/dist/Safe/t/safe1.t +++ b/dist/Safe/t/safe1.t @@ -21,7 +21,7 @@ use Opcode 1.00, qw(opdesc opset opset_to_ops opset_to_hex use Safe 1.00; -my $last_test; # initalised at end +my $last_test; # initialised at end print "1..$last_test\n"; my $t = 1; diff --git a/dist/Safe/t/safe2.t b/dist/Safe/t/safe2.t index 2548dcc6e8..b861884d57 100644 --- a/dist/Safe/t/safe2.t +++ b/dist/Safe/t/safe2.t @@ -18,7 +18,7 @@ use Opcode 1.00, qw(opdesc opset opset_to_ops opset_to_hex use Safe 1.00; -my $last_test; # initalised at end +my $last_test; # initialised at end print "1..$last_test\n"; # Set up a package namespace of things to be visible to the unsafe code @@ -120,7 +120,7 @@ print $@ =~ /foo bar/ ? "ok 29\n" : "not ok 29\n"; my $t = 30; $! = 0; -my $nosuch = '/non/existant/file.name'; +my $nosuch = '/non/existent/file.name'; open(NOSUCH, $nosuch); if ($@) { my $errno = $!; diff --git a/dist/Safe/t/safeuniversal.t b/dist/Safe/t/safeuniversal.t index 95867c5a1f..ad2377562c 100644 --- a/dist/Safe/t/safeuniversal.t +++ b/dist/Safe/t/safeuniversal.t @@ -26,7 +26,7 @@ my $r = $c->reval($no_warn_redef . q! (bless[],"Foo")->isa("Foo"); !); -is( $r, "pwned", "isa overriden in compartment" ); +is( $r, "pwned", "isa overridden in compartment" ); is( (bless[],"Foo")->isa("Foo"), 1, "... but not outside" ); sub Foo::foo {} @@ -36,7 +36,7 @@ $r = $c->reval($no_warn_redef . q! (bless[],"Foo")->can("foo"); !); -is( $r, "pwned", "can overriden in compartment" ); +is( $r, "pwned", "can overridden in compartment" ); is( (bless[],"Foo")->can("foo"), \&Foo::foo, "... but not outside" ); $r = $c->reval(q! |