From: Perl 5 Porters <perl5-porters@africa.nicoh.com>
Date: Thu, 8 Feb 1996 01:11:42 +0000 (+0000)
Subject: VMS-specific patch.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=75ced34b0f4e7f4479cccde7dc7bd540b5839df8;p=p5sagit%2Fp5-mst-13.2.git

VMS-specific patch.
---

diff --git a/ext/Fcntl/Fcntl.xs b/ext/Fcntl/Fcntl.xs
index dfdf099..90f3af5 100644
--- a/ext/Fcntl/Fcntl.xs
+++ b/ext/Fcntl/Fcntl.xs
@@ -2,7 +2,11 @@
 #include "perl.h"
 #include "XSUB.h"
 
-#include <fcntl.h>
+#ifdef VMS
+#  include <file.h>
+#else
+#  include <fcntl.h>
+#endif
 
 /* This comment is a kludge to get metaconfig to see the symbols
     VAL_O_NONBLOCK