pumpkin.pod: Add L<> around html link

[perl5.git] / ext / Fcntl / Fcntl.pm

diff --git a/ext/Fcntl/Fcntl.pm b/ext/Fcntl/Fcntl.pm
index 6e1c1af..cc35ff0 100644 (file)
--- a/ext/Fcntl/Fcntl.pm
+++ b/ext/Fcntl/Fcntl.pm
@@ -56,12 +56,12 @@ See L<perlfunc/stat> about the S_I* constants.
 =cut
 
 use strict;
-our($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $AUTOLOAD);
+our($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
 
 require Exporter;
 require XSLoader;
 @ISA = qw(Exporter);
-$VERSION = '1.09';
+$VERSION = '1.11';
 
 XSLoader::load();
 
@@ -183,10 +183,4 @@ XSLoader::load();
        O_NOTRANS
 ), map {@{$_}} values %EXPORT_TAGS);
 
-sub AUTOLOAD {
-    (my $constname = $AUTOLOAD) =~ s/.*:://;
-    die "&Fcntl::constant not defined" if $constname eq 'constant';
-    constant($constname);
-}
-
 1;