This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[comment patch] (ed: mg.c:mg_set() => mg.c:Perl_magic_set())
authorStas Bekman <stas@stason.org>
Wed, 11 Feb 2004 16:53:54 +0000 (08:53 -0800)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Thu, 12 Feb 2004 14:32:15 +0000 (14:32 +0000)
Message-ID: <402ACEA2.4020907@stason.org>

p4raw-id: //depot/perl@22299

perl.c

diff --git a/perl.c b/perl.c
index f32e346..dfc2a3f 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -963,7 +963,7 @@ setuid perl scripts securely.\n");
     {
        /* Set PL_origalen be the sum of the contiguous argv[]
         * elements plus the size of the env in case that it is
-        * contiguous with the argv[].  This is used in mg.c:mg_set()
+        * contiguous with the argv[].  This is used in mg.c:Perl_magic_set()
         * as the maximum modifiable length of $0.  In the worst case
         * the area we are able to modify is limited to the size of
         * the original argv[0].  (See below for 'contiguous', though.)