diff options
| author | Nicholas Clark <nick@ccl4.org> | 2005-12-23 00:18:49 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-12-23 00:18:49 +0000 |
| commit | 9a66ea416324d5cd1459c59e545b38c9c889fdaa (patch) | |
| tree | a9e5a856740598ab0e728c180dbf1f3e4cfb33a9 /lib/locale.t | |
| parent | 85a5de57f0760868dc6c90e36fe9b7ed954769c0 (diff) | |
| download | perl-9a66ea416324d5cd1459c59e545b38c9c889fdaa.tar.gz | |
Create a sub LC_ALL with the correct prototype.
p4raw-id: //depot/perl@26460
Diffstat (limited to 'lib/locale.t')
| -rw-r--r-- | lib/locale.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/locale.t b/lib/locale.t index 5d17797fca..b4ba02d8b7 100644 --- a/lib/locale.t +++ b/lib/locale.t @@ -52,7 +52,7 @@ my $last = $have_setlocale ? &last : &last_without_setlocale; print "1..$last\n"; -use vars qw(&LC_ALL); +sub LC_ALL (); $a = 'abc %'; |