From: Jarkko Hietaniemi <jhi@cc.hut.fi>
Date: Sat, 25 Jan 1997 15:10:20 +0000 (+0200)
Subject: Fcntl.xs: F_[GS]ETOWN were in wrong case branch
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5f832ef353a0bd2ca8a7cb6ea0b7e25cf9fcb9dd;p=p5sagit%2Fp5-mst-13.2.git

Fcntl.xs: F_[GS]ETOWN were in wrong case branch

private-msgid: <199701251510.RAA05142@alpha.hut.fi>
---

diff --git a/ext/Fcntl/Fcntl.pm b/ext/Fcntl/Fcntl.pm
index d9e3694..678b7fd 100644
--- a/ext/Fcntl/Fcntl.pm
+++ b/ext/Fcntl/Fcntl.pm
@@ -39,7 +39,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $AUTOLOAD);
 require Exporter;
 require DynaLoader;
 @ISA = qw(Exporter DynaLoader);
-$VERSION = "1.02";
+$VERSION = "1.03";
 # Items to export into callers namespace by default
 # (move infrequently used names to @EXPORT_OK below)
 @EXPORT =
diff --git a/ext/Fcntl/Fcntl.xs b/ext/Fcntl/Fcntl.xs
index 4ecdf91..a948643 100644
--- a/ext/Fcntl/Fcntl.xs
+++ b/ext/Fcntl/Fcntl.xs
@@ -57,6 +57,12 @@ int arg;
 #else
 	        goto not_there;
 #endif
+	    if (strEQ(name, "F_GETOWN"))
+#ifdef F_GETOWN
+	        return F_GETOWN;
+#else
+	        goto not_there;
+#endif
 	    if (strEQ(name, "F_SETFD"))
 #ifdef F_SETFD
 	        return F_SETFD;
@@ -87,6 +93,12 @@ int arg;
 #else
 	        goto not_there;
 #endif
+	    if (strEQ(name, "F_SETOWN"))
+#ifdef F_SETOWN
+	        return F_SETOWN;
+#else
+	        goto not_there;
+#endif
 	    if (strEQ(name, "F_RDLCK"))
 #ifdef F_RDLCK
 	        return F_RDLCK;
@@ -250,18 +262,6 @@ int arg;
 #else
 	        goto not_there;
 #endif
-	    if (strEQ(name, "F_SETOWN"))
-#ifdef F_SETOWN
-	        return F_SETOWN;
-#else
-	        goto not_there;
-#endif
-	    if (strEQ(name, "F_GETOWN"))
-#ifdef F_GETOWN
-	        return F_GETOWN;
-#else
-	        goto not_there;
-#endif
 	    if (strEQ(name, "O_DEFER"))
 #ifdef O_DEFER
 	        return O_DEFER;