summaryrefslogtreecommitdiff
path: root/lib/English.pm
diff options
context:
space:
mode:
authorThomas Sibley <tsibley@cpan.org>2015-09-09 22:51:06 -0700
committerKarl Williamson <khw@cpan.org>2015-09-11 12:16:47 -0600
commit55ff8cc02359641b4e0dc6cfc068cc5036bde41b (patch)
tree2e5451d176bc6ce65b76d3f61a693e1090051589 /lib/English.pm
parent2e67aae74c57dc888de2c1e06b8b063ee6879d2b (diff)
downloadperl-55ff8cc02359641b4e0dc6cfc068cc5036bde41b.tar.gz
English.pm: Only alias $- to $FORMAT_LINES_LEFT
Avoids aliasing %- and @- as %FORMAT_LINES_LEFT and @FORMAT_LINES_LEFT. I audited the rest of perlvar and English.pm for over-eager aliasing of unrelated variables but found no other cases.
Diffstat (limited to 'lib/English.pm')
-rw-r--r--lib/English.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/English.pm b/lib/English.pm
index efd61ff89f..e40cc124a1 100644
--- a/lib/English.pm
+++ b/lib/English.pm
@@ -1,6 +1,6 @@
package English;
-our $VERSION = '1.09';
+our $VERSION = '1.10';
require Exporter;
@ISA = qw(Exporter);
@@ -182,7 +182,7 @@ sub import {
*FORMAT_PAGE_NUMBER = *% ;
*FORMAT_LINES_PER_PAGE = *= ;
- *FORMAT_LINES_LEFT = *- ;
+ *FORMAT_LINES_LEFT = *-{SCALAR} ;
*FORMAT_NAME = *~ ;
*FORMAT_TOP_NAME = *^ ;
*FORMAT_LINE_BREAK_CHARACTERS = *: ;