diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-20 00:47:17 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-20 00:47:17 +0000 |
| commit | 563aca73f1f51dd4b10089896b544a6ae41316cb (patch) | |
| tree | 11463755af3a947b580964d01973ecdca4d7c34a /gv.c | |
| parent | 5268fa5e42057e14becd41f2d5ad225f678c4747 (diff) | |
| download | perl-563aca73f1f51dd4b10089896b544a6ae41316cb.tar.gz | |
Surely a typo.
p4raw-id: //depot/perl@15349
Diffstat (limited to 'gv.c')
| -rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1821,7 +1821,7 @@ Perl_is_gv_magical(pTHX_ char *name, STRLEN len, U32 flags) break; case '\017': /* $^O & $^OPEN */ if (len == 1 - || (len == 4 && strEQ(name, "\027PEN"))) + || (len == 4 && strEQ(name, "\017PEN"))) { goto yes; } |