diff options
author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-09-03 04:42:42 +0000 |
---|---|---|
committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1996-09-03 04:42:42 +0000 |
commit | 8a1da95f424b3f503ca14c0d79874d7cc4fdddf4 (patch) | |
tree | 0ab39ae29239195eddf65316b14aa83967e806c1 /lib | |
parent | cee7b94a06fb7b044854046abe55cbd88bdb2b55 (diff) | |
download | perl-8a1da95f424b3f503ca14c0d79874d7cc4fdddf4.tar.gz |
Updated to MakeMaker-5.38.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/ExtUtils/Liblist.pm | 4 | ||||
-rw-r--r-- | lib/ExtUtils/Manifest.pm | 22 | ||||
-rw-r--r-- | lib/ExtUtils/Mkbootstrap.pm | 4 | ||||
-rw-r--r-- | lib/ExtUtils/Mksymlists.pm | 2 |
4 files changed, 19 insertions, 13 deletions
diff --git a/lib/ExtUtils/Liblist.pm b/lib/ExtUtils/Liblist.pm index 097203e188..dc8b94334e 100644 --- a/lib/ExtUtils/Liblist.pm +++ b/lib/ExtUtils/Liblist.pm @@ -1,8 +1,8 @@ package ExtUtils::Liblist; - +use vars qw($VERSION); # Broken out of MakeMaker from version 4.11 -$ExtUtils::Liblist::VERSION = substr q$Revision: 1.20 $, 10; +$VERSION = substr q$Revision: 1.20 $, 10; use Config; use Cwd 'cwd'; diff --git a/lib/ExtUtils/Manifest.pm b/lib/ExtUtils/Manifest.pm index 14d0f6e1be..9859b98d72 100644 --- a/lib/ExtUtils/Manifest.pm +++ b/lib/ExtUtils/Manifest.pm @@ -1,21 +1,23 @@ package ExtUtils::Manifest; - require Exporter; -@ISA=('Exporter'); -@EXPORT_OK = ('mkmanifest', 'manicheck', 'fullcheck', 'filecheck', - 'skipcheck', 'maniread', 'manicopy'); - use Config; use File::Find; use File::Copy 'copy'; use Carp; +use strict; + +use vars qw(@ISA @EXPORT_OK $VERSION $Debug $Verbose $Is_VMS $Quiet $MANIFEST $found); + +@ISA=('Exporter'); +@EXPORT_OK = ('mkmanifest', 'manicheck', 'fullcheck', 'filecheck', + 'skipcheck', 'maniread', 'manicopy'); $Debug = 0; $Verbose = 1; $Is_VMS = $^O eq 'VMS'; -$VERSION = $VERSION = substr(q$Revision: 1.24 $,10,4); +$VERSION = substr(q$Revision: 1.27 $,10,4); $Quiet = 0; @@ -181,7 +183,7 @@ sub manicopy { } sub cp_if_diff { - my($from,$to, $how)=@_; + my($from, $to, $how)=@_; -f $from || carp "$0: $from not found"; my($diff) = 0; local(*F,*T); @@ -197,7 +199,11 @@ sub cp_if_diff { if (-e $to) { unlink($to) or confess "unlink $to: $!"; } - &$how($from, $to); + STRICT_SWITCH: { + best($from,$to), last STRICT_SWITCH if $how eq 'best'; + cp($from,$to), last STRICT_SWITCH if $how eq 'cp'; + ln($from,$to), last STRICT_SWITCH if $how eq 'ln'; + } } } diff --git a/lib/ExtUtils/Mkbootstrap.pm b/lib/ExtUtils/Mkbootstrap.pm index 77339bd322..35d5236072 100644 --- a/lib/ExtUtils/Mkbootstrap.pm +++ b/lib/ExtUtils/Mkbootstrap.pm @@ -1,7 +1,7 @@ package ExtUtils::Mkbootstrap; -$VERSION = substr q$Revision: 1.11 $, 10; -# $Id: Mkbootstrap.pm,v 1.11 1996/05/31 08:23:54 k Exp k $ +$VERSION = substr q$Revision: 1.13 $, 10; +# $Date: 1996/09/03 17:04:43 $ use Config; use Exporter; diff --git a/lib/ExtUtils/Mksymlists.pm b/lib/ExtUtils/Mksymlists.pm index 3583194c4a..47c37bf623 100644 --- a/lib/ExtUtils/Mksymlists.pm +++ b/lib/ExtUtils/Mksymlists.pm @@ -7,7 +7,7 @@ use Exporter; use vars qw( @ISA @EXPORT $VERSION ); @ISA = 'Exporter'; @EXPORT = '&Mksymlists'; -$VERSION = '1.03'; +$VERSION = substr q$Revision: 1.12 $, 10; sub Mksymlists { my(%spec) = @_; |