diff options
| author | Gisle Aas <gisle@activestate.com> | 2006-01-04 13:00:45 +0000 |
|---|---|---|
| committer | Gisle Aas <gisle@activestate.com> | 2006-01-04 13:00:45 +0000 |
| commit | 1c5d1ca7ee89d1e1782f94ae9883de9a1052a87d (patch) | |
| tree | d4467d134143050e200a207185eca9a7d86f74e8 /pp_sys.c | |
| parent | 396482e1e4786de2b4c8ab57cb613dc0f110b931 (diff) | |
| download | perl-1c5d1ca7ee89d1e1782f94ae9883de9a1052a87d.tar.gz | |
Get rid of a few more hardcoded string lengths.
p4raw-id: //depot/perl@26642
Diffstat (limited to 'pp_sys.c')
| -rw-r--r-- | pp_sys.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1327,7 +1327,7 @@ PP(pp_leavewrite) !gv_fetchpv("top", 0, SVt_PVFM)) IoTOP_NAME(io) = savesvpv(topname); else - IoTOP_NAME(io) = savepvn("top", 3); + IoTOP_NAME(io) = savepvn(STR_WITH_LEN("top")); } topgv = gv_fetchpv(IoTOP_NAME(io), 0, SVt_PVFM); if (!topgv || !GvFORM(topgv)) { |