come new version related code in perl.c is not enabled -- explain why
Yves Orton [Sat, 27 Dec 2008 10:30:17 +0000 (11:30 +0100)]
perl.c

diff --git a/perl.c b/perl.c
index be78890..12db1b5 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -1909,6 +1909,8 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit)
                        for (i = 1; i <= LOCAL_PATCH_COUNT; i++) {
                            if (PL_localpatches[i])
 #ifdef X_PERL_PATCHNUM
+/* this is ifdef'ed out, we would enable this if we want to transform 
+   "DEVEL" registered patches into the git name */
                                if (strEQ(PL_localpatches[i],"DEVEL"))
                                    Perl_sv_catpvf(aTHX_ opts_prog,"q%c\t%s\n%c,",
                                               0, STRINGIFY(PERL_PATCHNUM), 0);