Fix a typo in an assert(). It helps to compile with -DDEBUGGING

p4raw-id: //depot/perl@23603

1 files changed, 1 insertions, 1 deletions

diff --git a/perl.c b/perl.c
index d0a1401a67..e10fe78903 100644
--- a/perl.c
+++ b/perl.c
@@ -4413,7 +4413,7 @@ S_incpush(pTHX_ char *p, int addsubdirs, int addoldvers, int usesep)
 	av_push(GvAVn(PL_incgv), libdir);
     }
     if (subdir) {
-	assert (SvREFCNT(subdr) == 1);
+	assert (SvREFCNT(subdir) == 1);
 	SvREFCNT_dec(subdir);
     }
 }