diff options
author | Chip Salzenberg <chip@perl.com> | 1997-03-07 03:48:20 +1200 |
---|---|---|
committer | Chip Salzenberg <chip@atlantic.net> | 1997-04-09 00:00:00 +0000 |
commit | a5571d593ac90d11dc2015dcb1d4f62bc0d28a6d (patch) | |
tree | 36d5c91e1099c5f6252ddad12663f2a81aa8a8d2 /x2p/a2py.c | |
parent | 8b6a6e55c8aee2cca22dc5eb0d7dfb73f878584c (diff) | |
download | perl-a5571d593ac90d11dc2015dcb1d4f62bc0d28a6d.tar.gz |
Add B<-o> option to a2p, for old awk; make new the default
Diffstat (limited to 'x2p/a2py.c')
-rw-r--r-- | x2p/a2py.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/x2p/a2py.c b/x2p/a2py.c index 46ec604c06..ad685fe7e9 100644 --- a/x2p/a2py.c +++ b/x2p/a2py.c @@ -80,6 +80,9 @@ register char **env; case 'n': namelist = savestr(argv[0]+2); break; + case 'o': + old_awk = TRUE; + break; case '-': argc--,argv++; goto switch_end; |