Change 14949 by jhi@alpha on 2002/03/02 19:33:29
For now, make "incorrect case" a Win32-only warning.
Affected files ...
.... //depot/perl/op.c#486 edit
Differences ...
==== //depot/perl/op.c#486 (text) ====
Index: perl/op.c
--- perl/op.c.~1~ Sat Mar 2 12:45:06 2002
+++ perl/op.c Sat Mar 2 12:45:06 2002
@@ -3451,11 +3451,13 @@
newSTATEOP(0, Nullch, imop) ));
if (packname) {
+#ifdef WIN32
if (ckWARN(WARN_MISC) && !gv_stashpvn(packname, packlen, FALSE)) {
Perl_warner(aTHX_ WARN_MISC,
"Package `%s' not found "
"(did you use the incorrect case?)", packname);
}
+#endif
safefree(packname);
}
End of Patch.
