* Synced the perlfaq

[p5sagit/p5-mst-13.2.git] / lib / UNIVERSAL.pm

diff --git a/lib/UNIVERSAL.pm b/lib/UNIVERSAL.pm
index 01a16ca..5e3c8c8 100644 (file)
--- a/lib/UNIVERSAL.pm
+++ b/lib/UNIVERSAL.pm
@@ -1,6 +1,6 @@
 package UNIVERSAL;
 
-our $VERSION = '1.04';
+our $VERSION = '1.05';
 
 # UNIVERSAL should not contain any extra subs/methods beyond those
 # that it exists to define. The use of Exporter below is a historical
@@ -11,12 +11,11 @@ our $VERSION = '1.04';
 require Exporter;
 @EXPORT_OK = qw(isa can VERSION);
 
-require warnings;
-
 # Make sure that even though the import method is called, it doesn't do
 # anything unless called on UNIVERSAL.
 sub import {
     return unless $_[0] eq __PACKAGE__;
+    require warnings;
     warnings::warnif(
       'deprecated',
       'UNIVERSAL->import is deprecated and will be removed in a future perl',