add deprecate.pm usage to CPANPLUS
authorRicardo Signes <rjbs@cpan.org>
Mon, 21 Jan 2013 16:34:42 +0000 (11:34 -0500)
committerRicardo Signes <rjbs@cpan.org>
Mon, 21 Jan 2013 21:14:37 +0000 (16:14 -0500)
39 files changed:
cpan/CPANPLUS/lib/CPANPLUS.pm
cpan/CPANPLUS/lib/CPANPLUS/Backend.pm
cpan/CPANPLUS/lib/CPANPLUS/Backend/RV.pm
cpan/CPANPLUS/lib/CPANPLUS/Config.pm
cpan/CPANPLUS/lib/CPANPLUS/Config/HomeEnv.pm
cpan/CPANPLUS/lib/CPANPLUS/Configure.pm
cpan/CPANPLUS/lib/CPANPLUS/Configure/Setup.pm
cpan/CPANPLUS/lib/CPANPLUS/Dist.pm
cpan/CPANPLUS/lib/CPANPLUS/Dist/Autobundle.pm
cpan/CPANPLUS/lib/CPANPLUS/Dist/Base.pm
cpan/CPANPLUS/lib/CPANPLUS/Dist/MM.pm
cpan/CPANPLUS/lib/CPANPLUS/Dist/Sample.pm
cpan/CPANPLUS/lib/CPANPLUS/Error.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Constants.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Constants/Report.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Extract.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Fetch.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Report.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Search.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Source.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Source/Memory.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Source/SQLite.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Source/SQLite/Tie.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Utils.pm
cpan/CPANPLUS/lib/CPANPLUS/Internals/Utils/Autoflush.pm
cpan/CPANPLUS/lib/CPANPLUS/Module.pm
cpan/CPANPLUS/lib/CPANPLUS/Module/Author.pm
cpan/CPANPLUS/lib/CPANPLUS/Module/Author/Fake.pm
cpan/CPANPLUS/lib/CPANPLUS/Module/Checksums.pm
cpan/CPANPLUS/lib/CPANPLUS/Module/Fake.pm
cpan/CPANPLUS/lib/CPANPLUS/Module/Signature.pm
cpan/CPANPLUS/lib/CPANPLUS/Selfupdate.pm
cpan/CPANPLUS/lib/CPANPLUS/Shell.pm
cpan/CPANPLUS/lib/CPANPLUS/Shell/Classic.pm
cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm
cpan/CPANPLUS/lib/CPANPLUS/Shell/Default/Plugins/CustomSource.pm
cpan/CPANPLUS/lib/CPANPLUS/Shell/Default/Plugins/Remote.pm
cpan/CPANPLUS/lib/CPANPLUS/Shell/Default/Plugins/Source.pm

index f8b3f6e..e0ff071 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS;
+use deprecate;
 
 use strict;
 use Carp;
@@ -13,7 +14,7 @@ BEGIN {
     use vars        qw( @EXPORT @ISA $VERSION );
     @EXPORT     =   qw( shell fetch get install );
     @ISA        =   qw( Exporter );
-    $VERSION = "0.9134";     #have to hardcode or cpan.org gets unhappy
+    $VERSION = "0.9135";     #have to hardcode or cpan.org gets unhappy
 }
 
 ### purely for backward compatibility, so we can call it from the commandline:
index 5eece4d..85559dc 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Backend;
+use deprecate;
 
 use strict;
 
@@ -23,7 +24,7 @@ $Params::Check::VERBOSE = 1;
 use vars qw[@ISA $VERSION];
 
 @ISA     = qw[CPANPLUS::Internals];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 ### mark that we're running under CPANPLUS to spawned processes
 $ENV{'PERL5_CPANPLUS_IS_RUNNING'} = $$;
index 2e577c6..e7310ee 100644 (file)
@@ -1,8 +1,9 @@
 package CPANPLUS::Backend::RV;
+use deprecate;
 
 use strict;
 use vars qw[$STRUCT $VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 use CPANPLUS::Error;
 use CPANPLUS::Internals::Constants;
index 5abe765..26a056f 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Config;
+use deprecate;
 
 use strict;
 use warnings;
@@ -20,7 +21,7 @@ use Module::Load::Conditional   qw[check_install];
 use version;
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 =pod
 
index dd16644..90703a0 100644 (file)
@@ -1,10 +1,11 @@
 package CPANPLUS::Config::HomeEnv;
+use deprecate;
 
 use strict;
 use File::Spec;
 use vars qw($VERSION);
 
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 sub setup {
   my $conf = shift;
index 1d9cc92..1abf759 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Configure;
+use deprecate;
 use strict;
 
 
@@ -20,7 +21,7 @@ local $Params::Check::VERBOSE = 1;
 
 ### require, avoid circular use ###
 require CPANPLUS::Internals;
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 ### can't use O::A as we're using our own AUTOLOAD to get to
 ### the config options.
index adebbe2..8ac565a 100644 (file)
@@ -1,8 +1,9 @@
 package CPANPLUS::Configure::Setup;
+use deprecate;
 
 use strict;
 use vars    qw[@ISA $VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 use base    qw[CPANPLUS::Internals::Utils];
 use base    qw[Object::Accessor];
index 48d0baa..51ee5fb 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Dist;
+use deprecate;
 
 use strict;
 
@@ -15,7 +16,7 @@ use Module::Load::Conditional   qw[can_load check_install];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 use base 'Object::Accessor';
 
index ca33f24..d5e45f3 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Dist::Autobundle;
+use deprecate;
 
 use strict;
 use warnings;
@@ -6,7 +7,7 @@ use CPANPLUS::Error             qw[error msg];
 use Params::Check               qw[check];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 use base qw[CPANPLUS::Dist::Base];
 
index 996f213..73736d9 100644 (file)
@@ -1,10 +1,11 @@
 package CPANPLUS::Dist::Base;
+use deprecate;
 
 use strict;
 
 use base    qw[CPANPLUS::Dist];
 use vars    qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 =head1 NAME
 
index 3380d6a..35f31b7 100644 (file)
@@ -1,10 +1,11 @@
 package CPANPLUS::Dist::MM;
+use deprecate;
 
 use strict;
 use warnings;
 use vars    qw[@ISA $STATUS $VERSION];
 use base    'CPANPLUS::Dist::Base';
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 use CPANPLUS::Internals::Constants;
 use CPANPLUS::Internals::Constants::Report;
index e298422..e03d66f 100644 (file)
@@ -1,7 +1,8 @@
 package CPANPLUS::Dist::Sample;
+use deprecate;
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 =pod
 
index 9697210..0df6f33 100644 (file)
@@ -1,8 +1,9 @@
 package CPANPLUS::Error;
+use deprecate;
 
 use strict;
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 use Log::Message private => 0;;
 
index ab17584..5c53e67 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals;
+use deprecate;
 
 ### we /need/ perl5.6.1 or higher -- we use coderefs in @INC,
 ### and 5.6.0 is just too buggy
@@ -39,7 +40,7 @@ use vars qw[@ISA $VERSION];
             CPANPLUS::Internals::Report
         ];
 
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 =pod
 
index a2ec10b..09501c7 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Constants;
+use deprecate;
 
 use strict;
 
@@ -13,7 +14,7 @@ use vars    qw[$VERSION @ISA @EXPORT];
 
 use Package::Constants;
 
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 @ISA        = qw[Exporter];
 @EXPORT     = Package::Constants->list( __PACKAGE__ );
 
index 82a14f0..dc92ec6 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Constants::Report;
+use deprecate;
 
 use strict;
 use CPANPLUS::Error;
@@ -14,7 +15,7 @@ use Package::Constants;
 ### for the version
 require CPANPLUS::Internals;
 
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 @ISA        = qw[Exporter];
 @EXPORT     = Package::Constants->list( __PACKAGE__ );
 
index 4b72f72..4028aac 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Extract;
+use deprecate;
 
 use strict;
 
@@ -14,7 +15,7 @@ use Module::Load::Conditional   qw[can_load check_install];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 local $Params::Check::VERBOSE = 1;
 
index 039da6a..098d1e3 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Fetch;
+use deprecate;
 
 use strict;
 
@@ -13,7 +14,7 @@ use Params::Check               qw[check];
 use Module::Load::Conditional   qw[can_load];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 $Params::Check::VERBOSE = 1;
 
index 291f2c9..c5892f9 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Report;
+use deprecate;
 
 use strict;
 
@@ -14,7 +15,7 @@ use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 use version;
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 $Params::Check::VERBOSE = 1;
 
index 21d8fe4..2a99dbf 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Search;
+use deprecate;
 
 use strict;
 
@@ -14,7 +15,7 @@ use Params::Check               qw[check allow];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 $Params::Check::VERBOSE = 1;
 
index 94752eb..8f8ad7b 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Source;
+use deprecate;
 
 use strict;
 
@@ -19,7 +20,7 @@ use Module::Load::Conditional   qw[can_load];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 $Params::Check::VERBOSE = 1;
 
index 2d72aee..a28532e 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Source::Memory;
+use deprecate;
 
 use base 'CPANPLUS::Internals::Source';
 
@@ -21,7 +22,7 @@ use Module::Load::Conditional   qw[can_load];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 $Params::Check::VERBOSE = 1;
 
index f6b76d0..50f82f4 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Source::SQLite;
+use deprecate;
 
 use strict;
 use warnings;
@@ -17,7 +18,7 @@ use Params::Check               qw[allow check];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 use constant TXN_COMMIT => 1000;
 
index 461524e..b44b04b 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Source::SQLite::Tie;
+use deprecate;
 
 use strict;
 use warnings;
@@ -14,7 +15,7 @@ use Module::Load::Conditional   qw[can_load];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[@ISA $VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 require Tie::Hash;
 push @ISA, 'Tie::StdHash';
index 5715a32..58ece81 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Internals::Utils;
+use deprecate;
 
 use strict;
 
@@ -13,7 +14,7 @@ use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 use version;
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 local $Params::Check::VERBOSE = 1;
 
index a0ed165..8aa9030 100644 (file)
@@ -1,7 +1,8 @@
 package CPANPLUS::Internals::Utils::Autoflush;
+use deprecate;
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 BEGIN { $|++ };
 
index 61347f4..4eda894 100644 (file)
@@ -1,8 +1,9 @@
 package CPANPLUS::Module;
+use deprecate;
 
 use strict;
 use vars qw[@ISA $VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 use CPANPLUS::Dist;
 use CPANPLUS::Error;
index a53f839..c95de40 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Module::Author;
+use deprecate;
 
 use strict;
 
@@ -7,7 +8,7 @@ use CPANPLUS::Internals::Constants;
 use Params::Check               qw[check];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 local $Params::Check::VERBOSE = 1;
 
index 1858140..15de66b 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Module::Author::Fake;
+use deprecate;
 
 
 use CPANPLUS::Module::Author;
@@ -9,7 +10,7 @@ use strict;
 use vars            qw[@ISA $VERSION];
 use Params::Check   qw[check];
 
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 @ISA = qw[CPANPLUS::Module::Author];
 
index 863b62a..51263b4 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Module::Checksums;
+use deprecate;
 
 use strict;
 use vars qw[@ISA $VERSION];
@@ -15,7 +16,7 @@ use Module::Load::Conditional   qw[can_load];
 $Params::Check::VERBOSE = 1;
 
 @ISA = qw[ CPANPLUS::Module::Signature ];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 =head1 NAME
 
index d79f8da..d6c94a5 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Module::Fake;
+use deprecate;
 
 
 use CPANPLUS::Error;
@@ -10,7 +11,7 @@ use strict;
 use vars            qw[@ISA $VERSION];
 use Params::Check   qw[check];
 
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 @ISA = qw[CPANPLUS::Module];
 $Params::Check::VERBOSE = 1;
 
index 6b98abf..802d8cc 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Module::Signature;
+use deprecate;
 
 use strict;
 
@@ -7,7 +8,7 @@ use CPANPLUS::Error;
 use Params::Check               qw[check];
 use Module::Load::Conditional   qw[can_load];
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 ### detached sig, not actually used afaik --kane ###
 #sub get_signature {
index 19e7020..8915712 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Selfupdate;
+use deprecate;
 
 use strict;
 use Params::Check               qw[check];
@@ -10,7 +11,7 @@ use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 use CPANPLUS::Internals::Constants;
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 $Params::Check::VERBOSE = 1;
 
index 4a38bf8..bf7482d 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Shell;
+use deprecate;
 
 use strict;
 
@@ -14,7 +15,7 @@ $Params::Check::VERBOSE = 1;
 
 use vars qw[@ISA $SHELL $DEFAULT $VERSION];
 
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 $DEFAULT    = SHELL_DEFAULT;
 
 =pod
index 3090a57..6cdc6f6 100644 (file)
@@ -5,6 +5,7 @@
 ##################################################
 
 package CPANPLUS::Shell::Classic;
+use deprecate;
 
 use strict;
 
@@ -30,7 +31,7 @@ $Params::Check::ALLOW_UNKNOWN = 1;
 BEGIN {
     use vars        qw[ $VERSION @ISA ];
     @ISA        =   qw[ CPANPLUS::Shell::_Base::ReadLine ];
-    $VERSION = "0.9134";
+    $VERSION = "0.9135";
 }
 
 load CPANPLUS::Shell;
index 1d5a134..4c9991d 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Shell::Default;
+use deprecate;
 
 use strict;
 
@@ -26,7 +27,7 @@ local $Data::Dumper::Indent     = 1; # for dumpering from !
 BEGIN {
     use vars        qw[ $VERSION @ISA ];
     @ISA        =   qw[ CPANPLUS::Shell::_Base::ReadLine ];
-    $VERSION = "0.9134";
+    $VERSION = "0.9135";
 }
 
 load CPANPLUS::Shell;
index fefa996..1c77ae2 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Shell::Default::Plugins::CustomSource;
+use deprecate;
 
 use strict;
 use CPANPLUS::Error                 qw[error msg];
@@ -8,7 +9,7 @@ use Data::Dumper;
 use Locale::Maketext::Simple        Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 =head1 NAME
 
index e72364a..0e74964 100644 (file)
@@ -1,4 +1,5 @@
 package CPANPLUS::Shell::Default::Plugins::Remote;
+use deprecate;
 
 use strict;
 
@@ -8,7 +9,7 @@ use CPANPLUS::Error             qw[error msg];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 =head1 NAME
 
index e599188..3038339 100644 (file)
@@ -1,11 +1,12 @@
 package CPANPLUS::Shell::Default::Plugins::Source;
+use deprecate;
 
 use strict;
 use CPANPLUS::Error             qw[error msg];
 use Locale::Maketext::Simple    Class => 'CPANPLUS', Style => 'gettext';
 
 use vars qw[$VERSION];
-$VERSION = "0.9134";
+$VERSION = "0.9135";
 
 =head1 NAME