From 9426adcd48655815b65cea5a9f1eebbe7e23a9df Mon Sep 17 00:00:00 2001
From: Ilya Zakharevich <ilya@math.berkeley.edu>
Date: Mon, 15 Nov 1999 20:50:31 -0500
Subject: applied suggested patch; removed $VERSION = $VERSION hack
 (change#4043 fixed the need for that) 	Message-Id:
 <199911160650.BAA18874@monk.mps.ohio-state.edu> 	Subject: [PATCH
 5.005_62] XSLoader.pm

p4raw-link: @4043 on //depot/cfgperl: 09bef84370e90d727656ea11ba5ee8be80e361d3

p4raw-id: //depot/perl@4623
---
 ext/Fcntl/Fcntl.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'ext/Fcntl')

diff --git a/ext/Fcntl/Fcntl.pm b/ext/Fcntl/Fcntl.pm
index 44bb0ae0b2..1eb14e9eb2 100644
--- a/ext/Fcntl/Fcntl.pm
+++ b/ext/Fcntl/Fcntl.pm
@@ -45,8 +45,8 @@ what constants are implemented in your system.
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $AUTOLOAD);
 
 require Exporter;
-require DynaLoader;
-@ISA = qw(Exporter DynaLoader);
+use XSLoader ();
+@ISA = qw(Exporter);
 $VERSION = "1.03";
 # Items to export into callers namespace by default
 # (move infrequently used names to @EXPORT_OK below)
@@ -161,6 +161,6 @@ sub AUTOLOAD {
     goto &$AUTOLOAD;
 }
 
-bootstrap Fcntl $VERSION;
+XSLoader::load 'Fcntl', $VERSION;
 
 1;
-- 
cgit v1.2.1