summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorAristotle Pagaltzis <pagaltzis@gmx.de>2013-01-09 11:26:56 +0100
committerTony Cook <tony@develop-help.com>2013-07-23 10:02:26 +1000
commit5fc691f12365580534cea1c0be21bed7badfb89a (patch)
tree83fe26603188ee875ae4458d68d22e09d8cb0abc /perl.c
parentcffd634c5d3a829d6a33c6ed44efd8a8dfbaf2aa (diff)
downloadperl-5fc691f12365580534cea1c0be21bed7badfb89a.tar.gz
Make the -F switch imply -a
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl.c b/perl.c
index ee36fd135f..41a62b7b74 100644
--- a/perl.c
+++ b/perl.c
@@ -3213,6 +3213,7 @@ Perl_moreswitches(pTHX_ const char *s)
PL_utf8cache = -1;
return s;
case 'F':
+ PL_minus_a = TRUE;
PL_minus_F = TRUE;
PL_splitstr = ++s;
while (*s && !isSPACE(*s)) ++s;