diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-02-02 16:44:58 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-02-02 16:44:58 +0000 |
| commit | 93979888e8ec8c77cb4951a3e9f792ab960c6715 (patch) | |
| tree | 9ecae0832f2c82af2f818e4cb217f47e72030431 /lib/charnames.t | |
| parent | 4d231bed26075f4fbc61b51ffe0c24e067dab248 (diff) | |
| download | perl-93979888e8ec8c77cb4951a3e9f792ab960c6715.tar.gz | |
EBCDIC: since #14519 made \N{...} to remap,
the test cannot expect an ASCII code point.
p4raw-id: //depot/perl@14525
Diffstat (limited to 'lib/charnames.t')
| -rw-r--r-- | lib/charnames.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/charnames.t b/lib/charnames.t index adc4b3f23e..e12b920f31 100644 --- a/lib/charnames.t +++ b/lib/charnames.t @@ -12,7 +12,7 @@ print "1..22\n"; use charnames ':full'; -print "not " unless "Here\N{EXCLAMATION MARK}?" eq "Here\041?"; +print "not " unless "Here\N{EXCLAMATION MARK}?" eq "Here!?"; print "ok 1\n"; { |