From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 1 Dec 2001 20:21:27 +0000 (+0000)
Subject: Have a little faith on nl_langinfo() itself.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e1faa3a01366d845f838995ae5732544dbf4ef9a;p=p5sagit%2Fp5-mst-13.2.git

Have a little faith on nl_langinfo() itself.

p4raw-id: //depot/perl@13413
---

diff --git a/ext/I18N/Langinfo/Langinfo.xs b/ext/I18N/Langinfo/Langinfo.xs
index 3a97daf..f1a0a17 100644
--- a/ext/I18N/Langinfo/Langinfo.xs
+++ b/ext/I18N/Langinfo/Langinfo.xs
@@ -19,31 +19,13 @@ langinfo(code)
 	int	code
   CODE:
 #ifdef HAS_NL_LANGINFO
-	char *s;
-	if (code > 0) { /* bold assumption: all valid langinfo codes > 0 */
-#ifdef _MAXSTRMSG
-	  if (code > _MAXSTRMSG)
-	        RETVAL = &PL_sv_undef;
-	    else
-#else
-#   ifdef _NL_NUM_ITEMS
-	    if (code >= _NL_NUM_ITEMS)
-	        RETVAL = &PL_sv_undef;
-	    else
-#   else
-#       ifdef _NL_NUM
-	    if (code >= _NL_NUM)
-	        RETVAL = &PL_sv_undef;
-	    else
-#       endif
-#   endif
-#endif
-	    {
-	        s = nl_langinfo(code);
-		RETVAL = newSVpvn(s, strlen(s));
-	    }
-	} else {
-	    RETVAL = &PL_sv_undef;
+	{
+	  char *s;
+
+	  if ((s = nl_langinfo(code)))
+	      RETVAL = newSVpvn(s, strlen(s));
+	  else
+	      RETVAL = &PL_sv_undef;
 	}
 #else
 	croak("nl_langinfo() not implemented on this architecture");