diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-01-11 15:04:51 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-01-11 15:04:51 +0000 |
| commit | 9688998215db24fcbbf5a5b6d1ac4ce0dd91d4a2 (patch) | |
| tree | dd62dc7cb9630f0052ac197f92100b1a8642c492 /t/run | |
| parent | 2b9dff677564dc07a8460b233c79a21850696d33 (diff) | |
| download | perl-9688998215db24fcbbf5a5b6d1ac4ce0dd91d4a2.tar.gz | |
Note the U8 sized space created by removing -P, and check that it is
now an illegal command line flag.
p4raw-id: //depot/perl@32956
Diffstat (limited to 't/run')
| -rw-r--r-- | t/run/switches.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/run/switches.t b/t/run/switches.t index 317586ed2f..4af3141fd7 100644 --- a/t/run/switches.t +++ b/t/run/switches.t @@ -11,7 +11,7 @@ BEGIN { BEGIN { require "./test.pl"; } -plan(tests => 61); +plan(tests => 62); use Config; @@ -255,7 +255,7 @@ SWTESTPM # Tests for switches which do not exist -foreach my $switch (split //, "ABbGgHJjKkLNOoQqRrYyZz123456789_") +foreach my $switch (split //, "ABbGgHJjKkLNOoPQqRrYyZz123456789_") { local $TODO = ''; # these ones should work on VMS |