Change 13412 by jhi@alpha on 2001/12/01 18:47:07
Typo (a missing endparen) and thinko (_MAXSTRMSG is
the max, not max plus one)
Affected files ...
.... //depot/perl/ext/I18N/Langinfo/Langinfo.xs#6 edit
Differences ...
==== //depot/perl/ext/I18N/Langinfo/Langinfo.xs#6 (text) ====
Index: perl/ext/I18N/Langinfo/Langinfo.xs
--- perl/ext/I18N/Langinfo/Langinfo.xs.~1~ Sat Dec 1 12:00:05 2001
+++ perl/ext/I18N/Langinfo/Langinfo.xs Sat Dec 1 12:00:05 2001
@@ -22,7 +22,7 @@
char *s;
if (code > 0) { /* bold assumption: all valid langinfo codes > 0 */
#ifdef _MAXSTRMSG
- if (code >= _MAXSTRMSG
+ if (code > _MAXSTRMSG)
RETVAL = &PL_sv_undef;
else
#else
End of Patch.
