r71383 - in /trunk/libextutils-command-perl: ./ debian/ debian/source/ lib/ExtUtils/ lib/Shell/ t/
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Mon Mar 14 01:06:01 UTC 2011
Author: jawnsy-guest
Date: Mon Mar 14 01:05:00 2011
New Revision: 71383
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=71383
Log:
* New upstream release
* Use short debhelper rules format
* Bump to debhelper compat 8
* Use new 3.0 (quilt) source format
* Add myself to Uploaders and Copyright
* Rewrite control description
* Update dependencies per upstream
* Drop unnecessary dependencies satisfied in oldstable
* Standards-Version 3.9.1 (refer specifically to GPL-1)
* Refresh copyright information
Added:
trunk/libextutils-command-perl/LICENSE
- copied unchanged from r71382, branches/upstream/libextutils-command-perl/current/LICENSE
trunk/libextutils-command-perl/META.json
- copied unchanged from r71382, branches/upstream/libextutils-command-perl/current/META.json
trunk/libextutils-command-perl/debian/source/
trunk/libextutils-command-perl/debian/source/format
trunk/libextutils-command-perl/dist.ini
- copied unchanged from r71382, branches/upstream/libextutils-command-perl/current/dist.ini
trunk/libextutils-command-perl/t/release-pod-syntax.t
- copied unchanged from r71382, branches/upstream/libextutils-command-perl/current/t/release-pod-syntax.t
Removed:
trunk/libextutils-command-perl/Build.PL
trunk/libextutils-command-perl/lib/Shell/
trunk/libextutils-command-perl/t/shell_command.t
trunk/libextutils-command-perl/t/shell_exit.t
Modified:
trunk/libextutils-command-perl/Changes
trunk/libextutils-command-perl/MANIFEST
trunk/libextutils-command-perl/META.yml
trunk/libextutils-command-perl/Makefile.PL
trunk/libextutils-command-perl/README
trunk/libextutils-command-perl/debian/changelog
trunk/libextutils-command-perl/debian/compat
trunk/libextutils-command-perl/debian/control
trunk/libextutils-command-perl/debian/copyright
trunk/libextutils-command-perl/debian/rules
trunk/libextutils-command-perl/lib/ExtUtils/Command.pm
trunk/libextutils-command-perl/t/cp.t
trunk/libextutils-command-perl/t/eu_command.t
Modified: trunk/libextutils-command-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/Changes?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/Changes (original)
+++ trunk/libextutils-command-perl/Changes Mon Mar 14 01:05:00 2011
@@ -1,3 +1,9 @@
+1.17 Sat, Feb 28, 2011
+ - Remove test boilerplate the reorganisation of dual-life modules in the perl
+ code made unnecessary.
+ - Remove Shell::Command - that module is now available in the Shell::Command
+ distribution on CPAN.
+
1.16 Mon, Jan 5, 2009
- Add support for VMS UNIX compatibilty mode:
https://rt.cpan.org/Ticket/Display.html?id=42144
Modified: trunk/libextutils-command-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/MANIFEST?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/MANIFEST (original)
+++ trunk/libextutils-command-perl/MANIFEST Mon Mar 14 01:05:00 2011
@@ -1,13 +1,13 @@
-Build.PL
+Changes
+LICENSE
+MANIFEST
+META.json
+META.yml
+Makefile.PL
+README
+dist.ini
lib/ExtUtils/Command.pm
-lib/Shell/Command.pm
-Makefile.PL
-MANIFEST This list of files
-README
-Changes
t/cp.t
t/eu_command.t
-t/shell_command.t
-t/shell_exit.t
t/lib/TieOut.pm
-META.yml Module meta-data (added by MakeMaker)
+t/release-pod-syntax.t
Modified: trunk/libextutils-command-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/META.yml?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/META.yml (original)
+++ trunk/libextutils-command-perl/META.yml Mon Mar 14 01:05:00 2011
@@ -1,37 +1,143 @@
---- #YAML:1.0
-name: ExtUtils-Command
-version: 1.16
-version_from: lib/ExtUtils/Command.pm
-installdirs: perl
-license: perl
-abstract: utilities to replace common UNIX commands in Makefiles etc.
+---
+abstract: 'utilities to replace common UNIX commands in Makefiles etc.'
author:
- - 'Randy Kobes <r.kobes at uwinnipeg.ca>'
+ - 'Nick Ing-Simmons <ni-s at cpan.org>'
+ - 'Michael G Schwern <schwern at pobox.com>'
+ - 'Randy Kobes <r.kobes at uwinnipeg.ca>'
+ - 'The Perl 5 Porters'
+build_requires: {}
+configure_requires:
+ ExtUtils::MakeMaker: 6.31
+dynamic_config: 0
+generated_by: 'Dist::Zilla version 4.200004, CPAN::Meta::Converter version 2.102400'
+license: perl
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
+name: ExtUtils-Command
requires:
- File::Basename: 0
- File::Spec: 0.8
-provides:
- ExtUtils::Command:
- file: lib/ExtUtils/Command.pm
- version: 1.16
- Shell::Command:
- file: lib/Shell/Command.pm
- version: 0.04
-distribution_type: module
-generated_by: Randy Kobes
-urls:
- license: http://dev.perl.org/licenses/
+ Carp: 0
+ Exporter: 0
+ File::Basename: 0
+ File::Compare: 0
+ File::Copy: 0
+ File::Path: 0
+ perl: 5.00503
+ vars: 0
resources:
- license: http://dev.perl.org/licenses/
- homepage: http://svn.perl.org/modules/ExtUtils-Command/trunk/
- bugtracker: http://rt.cpan.org/NoAuth/Bugs.html?Dist=ExtUtils-Command
- AnnoCPAN: http://annocpan.org/dist/ExtUtils-Command
- CPANForum: http://www.cpanforum.com/dist/ExtUtils-Command
- CPANTS: http://cpants.perl.org/dist/ExtUtils-Command
- Rating: http://cpanratings.perl.org/d/ExtUtils-Command
- SearchCPAN: http://search.cpan.org/~RKOBES/ExtUtils-Command/
- Testers: http://cpantesters.perl.org/show/ExtUtils-Command.html
- UWinnipeg: http://cpan.uwinnipeg.ca/dist/ExtUtils-Command
-meta-spec:
- version: 1.3
- url: http://module-build.sourceforge.net/META-spec-v1.3.html
+ bugtracker: http://rt.perl.org/rt3/
+ homepage: http://search.cpan.org/dist/ExtUtils-Command
+ repository: git://github.com/rafl/extutils-command.git
+version: 1.17
+x_Dist_Zilla:
+ plugins:
+ -
+ class: Dist::Zilla::Plugin::GatherDir
+ name: '@Basic/GatherDir'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::PruneCruft
+ name: '@Basic/PruneCruft'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::ManifestSkip
+ name: '@Basic/ManifestSkip'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::MetaYAML
+ name: '@Basic/MetaYAML'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::License
+ name: '@Basic/License'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::Readme
+ name: '@Basic/Readme'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::ExtraTests
+ name: '@Basic/ExtraTests'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::ExecDir
+ name: '@Basic/ExecDir'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::ShareDir
+ name: '@Basic/ShareDir'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::MakeMaker
+ name: '@Basic/MakeMaker'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::Manifest
+ name: '@Basic/Manifest'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::TestRelease
+ name: '@Basic/TestRelease'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::ConfirmRelease
+ name: '@Basic/ConfirmRelease'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::UploadToCPAN
+ name: '@Basic/UploadToCPAN'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::DualLife
+ name: DualLife
+ version: 0.01
+ -
+ class: Dist::Zilla::Plugin::MetaConfig
+ name: MetaConfig
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::MetaJSON
+ name: MetaJSON
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::PodSyntaxTests
+ name: PodSyntaxTests
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::MetaResources
+ name: MetaResources
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::Authority
+ name: Authority
+ version: 1.002
+ -
+ class: Dist::Zilla::Plugin::Prereqs
+ config:
+ Dist::Zilla::Plugin::Prereqs:
+ phase: runtime
+ type: requires
+ name: Prereqs
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::FinderCode
+ name: ':InstallModules'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::FinderCode
+ name: ':TestFiles'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::FinderCode
+ name: ':ExecFiles'
+ version: 4.200004
+ -
+ class: Dist::Zilla::Plugin::FinderCode
+ name: ':ShareFiles'
+ version: 4.200004
+ zilla:
+ class: Dist::Zilla::Dist::Builder
+ config:
+ is_trial: 0
+ version: 4.200004
+x_authority: cpan:P5P
Modified: trunk/libextutils-command-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/Makefile.PL?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/Makefile.PL (original)
+++ trunk/libextutils-command-perl/Makefile.PL Mon Mar 14 01:05:00 2011
@@ -1,30 +1,60 @@
+
use strict;
use warnings;
-use ExtUtils::MakeMaker;
-# See lib/ExtUtils/MakeMaker.pm for details of how to influence
-# the contents of the Makefile that is written.
-my %prereq = (
- # splitpath(), rel2abs()
- 'File::Spec' => 0.8,
- 'File::Basename' => 0,
- );
+BEGIN { require 5.00503; }
-my %opts = (
- NAME => 'ExtUtils::Command',
- VERSION_FROM => 'lib/ExtUtils/Command.pm',
- PL_FILES => {},
- PREREQ_PM => \%prereq,
- INSTALLDIRS => 'perl',
- );
+use ExtUtils::MakeMaker 6.31;
-my $eu_version = $ExtUtils::MakeMaker::VERSION;
-if ($eu_version >= 5.43) {
- $opts{ABSTRACT_FROM} = 'lib/ExtUtils/Command.pm';
- $opts{AUTHOR} = 'Randy Kobes <r.kobes at uwinnipeg.ca>';
-}
-if ($eu_version > 6.11) {
- $opts{NO_META} = 1;
+
+
+my %WriteMakefileArgs = (
+ 'ABSTRACT' => 'utilities to replace common UNIX commands in Makefiles etc.',
+ 'AUTHOR' => 'Nick Ing-Simmons <ni-s at cpan.org>, Michael G Schwern <schwern at pobox.com>, Randy Kobes <r.kobes at uwinnipeg.ca>, The Perl 5 Porters',
+ 'BUILD_REQUIRES' => {},
+ 'CONFIGURE_REQUIRES' => {
+ 'ExtUtils::MakeMaker' => '6.31'
+ },
+ 'DISTNAME' => 'ExtUtils-Command',
+ 'EXE_FILES' => [],
+ 'LICENSE' => 'perl',
+ 'NAME' => 'ExtUtils::Command',
+ 'PREREQ_PM' => {
+ 'Carp' => '0',
+ 'Exporter' => '0',
+ 'File::Basename' => '0',
+ 'File::Compare' => '0',
+ 'File::Copy' => '0',
+ 'File::Path' => '0',
+ 'vars' => '0'
+ },
+ 'VERSION' => '1.17',
+ 'test' => {
+ 'TESTS' => 't/*.t'
+ }
+);
+
+
+unless ( eval { ExtUtils::MakeMaker->VERSION(6.56) } ) {
+ my $br = delete $WriteMakefileArgs{BUILD_REQUIRES};
+ my $pp = $WriteMakefileArgs{PREREQ_PM};
+ for my $mod ( keys %$br ) {
+ if ( exists $pp->{$mod} ) {
+ $pp->{$mod} = $br->{$mod} if $br->{$mod} > $pp->{$mod};
+ }
+ else {
+ $pp->{$mod} = $br->{$mod};
+ }
+ }
}
-WriteMakefile(%opts);
+delete $WriteMakefileArgs{CONFIGURE_REQUIRES}
+ unless eval { ExtUtils::MakeMaker->VERSION(6.52) };
+
+$WriteMakefileArgs{INSTALLDIRS} = 'perl'
+ if $] >= 5.009005 && $] <= 5.011000;
+
+WriteMakefile(%WriteMakefileArgs);
+
+
+
Modified: trunk/libextutils-command-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/README?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/README (original)
+++ trunk/libextutils-command-perl/README Mon Mar 14 01:05:00 2011
@@ -1,22 +1,13 @@
-ExtUtils::Command provides a number of utilities to replace
-common UNIX commands in Makefiles, etc. At present the list includes
-cp, rm_f, rm_rf, mv, cat, eqtime, mkpath, touch, test_f, test_d,
-chmod, and dos2unix. Also included is the companion module
-Shell::Command, which is a thin wrapper for ExtUtils::Command
-to provide cross-platform functions emulating common shell commands.
-To install, execute the sequence
- perl Makefile.PL
- $MAKE
- $MAKE test
- $MAKE install
+This archive contains the distribution ExtUtils-Command,
+version 1.17:
-where $MAKE is the make program appropriate for your system.
-Alternatively, if you have Module::Build installed, you can do
+ utilities to replace common UNIX commands in Makefiles etc.
- perl Build.PL
- perl Build
- perl Build test
- perl Build install
+This software is copyright (c) 2011 by Nick Ing-Simmons.
+This is free software; you can redistribute it and/or modify it under
+the same terms as the Perl 5 programming language system itself.
+
+
Modified: trunk/libextutils-command-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/debian/changelog?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/debian/changelog (original)
+++ trunk/libextutils-command-perl/debian/changelog Mon Mar 14 01:05:00 2011
@@ -1,8 +1,21 @@
-libextutils-command-perl (1.16-2) UNRELEASED; urgency=low
+libextutils-command-perl (1.17-1) UNRELEASED; urgency=low
+ [ Jonathan Yu ]
+ * New upstream release
+ * Use short debhelper rules format
+ * Bump to debhelper compat 8
+ * Use new 3.0 (quilt) source format
+ * Add myself to Uploaders and Copyright
+ * Rewrite control description
+ * Update dependencies per upstream
+ * Drop unnecessary dependencies satisfied in oldstable
+ * Standards-Version 3.9.1 (refer specifically to GPL-1)
+ * Refresh copyright information
+
+ [ Nathan Handler ]
* debian/watch: Update to ignore development releases.
- -- Nathan Handler <nhandler at ubuntu.com> Sat, 06 Jun 2009 01:34:03 +0000
+ -- Jonathan Yu <jawnsy at cpan.org> Sun, 13 Mar 2011 21:25:59 -0400
libextutils-command-perl (1.16-1) unstable; urgency=low
Modified: trunk/libextutils-command-perl/debian/compat
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/debian/compat?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/debian/compat (original)
+++ trunk/libextutils-command-perl/debian/compat Mon Mar 14 01:05:00 2011
@@ -1,1 +1,1 @@
-7
+8
Modified: trunk/libextutils-command-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/debian/control?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/debian/control (original)
+++ trunk/libextutils-command-perl/debian/control Mon Mar 14 01:05:00 2011
@@ -1,13 +1,14 @@
Source: libextutils-command-perl
Section: perl
Priority: optional
-Build-Depends: debhelper (>= 7), libmodule-build-perl
-Build-Depends-Indep: perl (>= 5.6.10-12)
+Build-Depends: debhelper (>= 8)
+Build-Depends-Indep: perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: AGOSTINI Yves <agostini at univ-metz.fr>,
+ Jonathan Yu <jawnsy at cpan.org>,
Rene Mayorga <rmayorga at debian.org.sv>,
Brian Cassidy <brian.cassidy at gmail.com>
-Standards-Version: 3.8.0
+Standards-Version: 3.9.1
Homepage: http://search.cpan.org/dist/ExtUtils-Command/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libextutils-command-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libextutils-command-perl/
@@ -15,8 +16,8 @@
Package: libextutils-command-perl
Architecture: all
Depends: ${perl:Depends}, ${misc:Depends}
-Description: utilities to replace common UNIX commands in Makefiles etc
- ExtUtils::Command provide the thin wrapper Shell::Command - Cross-platform
- functions emulating common shell commands like mv, cp, touch
- .
- Filenames with * and ? will be glob expanded
+Description: module providing replacements for common UNIX commands
+ ExtUtils::Command is a Perl module that provides Pure Perl replacements of
+ common UNIX shell commands (cat, mv, cp, touch, rm, mkpath, chmod and more).
+ Because this module is a thin wrapper around Shell::Command, these functions
+ are platform independent and support glob expansion (* and ? masks).
Modified: trunk/libextutils-command-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/debian/copyright?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/debian/copyright (original)
+++ trunk/libextutils-command-perl/debian/copyright Mon Mar 14 01:05:00 2011
@@ -1,30 +1,31 @@
-Format-Specification:
- http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196
-Upstream-Maintainer: Randy Kobes <r.kobes at uwinnipeg.ca>.
-Upstream-Source: http://search.cpan.org/dist/ExtUtils-Command/
-Upstream-Name: ExtUtils-Command
+Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
+Maintainer: Florian Ragwitz <rafl at debian.org>
+Source: http://search.cpan.org/dist/ExtUtils-Command/
+Name: ExtUtils-Command
Files: *
-Copyright: 2002-2008 Randy Kobes <r.kobes at uwinnipeg.ca>,
- Michael G Schwern <schwern at pobox.com>, Nick Ing-Simmons <ni-s at cpan.org>
-License-Alias: Perl
-License: Artistic | GPL-1+
+Copyright: 2011, Nick Ing-Simmons <ni-s at cpan.org>
+License: Artistic or GPL-1+
Files: debian/*
-Copyright: 2008, various members of the Debian Perl Group, cf
- debian/changelog
-License: Artistic | GPL-1+
+Copyright: 2008, AGOSTINI Yves <agostini at univ-metz.fr>
+ 2008, Rene Mayorga <rmayorga at debian.org.sv>
+ 2009, Brian Cassidy <brian.cassidy at gmail.com>
+ 2011, Jonathan Yu <jawnsy at cpan.org>
+License: Artistic or GPL-1+
License: Artistic
- This program is free software; you can redistribute it and/or modify
- it under the terms of the Artistic License, which comes with Perl.
- On Debian GNU/Linux systems, the complete text of the Artistic License
- can be found in /usr/share/common-licenses/Artistic
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the Artistic License, which comes with Perl.
+ .
+ On Debian systems, the complete text of the Artistic License can be
+ found in `/usr/share/common-licenses/Artistic'.
License: GPL-1+
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 1, or (at your option)
- any later version.
- On Debian GNU/Linux systems, the complete text of the GNU General
- Public License can be found in `/usr/share/common-licenses/GPL'
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 1, or (at your option)
+ any later version.
+ .
+ On Debian systems, the complete text of version 1 of the GNU General
+ Public License can be found in `/usr/share/common-licenses/GPL-1'.
Modified: trunk/libextutils-command-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/debian/rules?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/debian/rules (original)
+++ trunk/libextutils-command-perl/debian/rules Mon Mar 14 01:05:00 2011
@@ -1,23 +1,4 @@
#!/usr/bin/make -f
-build: build-stamp
-build-stamp:
- dh build
- touch $@
-
-clean:
+%:
dh $@
-
-install: install-stamp
-install-stamp: build-stamp
- dh install
- touch $@
-
-binary-arch:
-
-binary-indep: install
- dh $@
-
-binary: binary-arch binary-indep
-
-.PHONY: binary binary-arch binary-indep install clean build
Added: trunk/libextutils-command-perl/debian/source/format
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/debian/source/format?rev=71383&op=file
==============================================================================
--- trunk/libextutils-command-perl/debian/source/format (added)
+++ trunk/libextutils-command-perl/debian/source/format Mon Mar 14 01:05:00 2011
@@ -1,0 +1,1 @@
+3.0 (quilt)
Modified: trunk/libextutils-command-perl/lib/ExtUtils/Command.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/lib/ExtUtils/Command.pm?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/lib/ExtUtils/Command.pm (original)
+++ trunk/libextutils-command-perl/lib/ExtUtils/Command.pm Mon Mar 14 01:05:00 2011
@@ -12,7 +12,7 @@
@ISA = qw(Exporter);
@EXPORT = qw(cp rm_f rm_rf mv cat eqtime mkpath touch test_f test_d chmod
dos2unix);
-$VERSION = '1.16';
+$VERSION = '1.17';
my $Is_VMS = $^O eq 'VMS';
my $Is_VMS_mode = $Is_VMS;
@@ -32,7 +32,7 @@
my $unix_rpt = $ENV{'DECC$FILENAME_UNIX_REPORT'} || '';
my $efs_charset = $ENV{'DECC$EFS_CHARSET'} || '';
my $efs_case = $ENV{'DECC$EFS_CASE_PRESERVE'} || '';
- $vms_unix_rpt = $unix_rpt =~ /^[ET1]/i;
+ $vms_unix_rpt = $unix_rpt =~ /^[ET1]/i;
$vms_efs = $efs_charset =~ /^[ET1]/i;
$vms_case = $efs_case =~ /^[ET1]/i;
}
@@ -97,7 +97,7 @@
Concatenates all files mentioned on command line to STDOUT.
-=cut
+=cut
sub cat ()
{
@@ -111,7 +111,7 @@
Sets modified time of destination to that of source.
-=cut
+=cut
sub eqtime
{
@@ -126,7 +126,7 @@
Removes files and directories - recursively (even if readonly)
-=cut
+=cut
sub rm_rf
{
@@ -140,7 +140,7 @@
Removes files (even if readonly)
-=cut
+=cut
sub rm_f {
expand_wildcards();
@@ -173,9 +173,9 @@
touch file ...
-Makes files exist, with current timestamp
-
-=cut
+Makes files exist, with current timestamp
+
+=cut
sub touch {
my $t = time;
@@ -197,7 +197,7 @@
Returns true if all moves succeeded, false otherwise.
-=cut
+=cut
sub mv {
expand_wildcards();
@@ -249,7 +249,7 @@
Sets UNIX like permissions 'mode' on all the files. e.g. 0666
-=cut
+=cut
sub chmod {
local @ARGV = @ARGV;
@@ -280,7 +280,7 @@
Creates directories, including any parent directories.
-=cut
+=cut
sub mkpath
{
@@ -295,7 +295,7 @@
Tests if a file exists. I<Exits> with 0 if it does, 1 if it does not (ie.
shell's idea of true and false).
-=cut
+=cut
sub test_f
{
@@ -337,9 +337,9 @@
my $orig = $_;
my $temp = '.dos2unix_tmp';
open ORIG, $_ or do { warn "dos2unix can't open $_: $!"; return };
- open TEMP, ">$temp" or
+ open TEMP, ">$temp" or
do { warn "dos2unix can't create .dos2unix_tmp: $!"; return };
- while (my $line = <ORIG>) {
+ while (my $line = <ORIG>) {
$line =~ s/\015\012/\012/g;
print TEMP $line;
}
@@ -366,4 +366,3 @@
Randy Kobes C<r.kobes at uwinnipeg.ca>.
=cut
-
Modified: trunk/libextutils-command-perl/t/cp.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/t/cp.t?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/t/cp.t (original)
+++ trunk/libextutils-command-perl/t/cp.t Mon Mar 14 01:05:00 2011
@@ -1,13 +1,7 @@
#!/usr/bin/perl -w
BEGIN {
- if( $ENV{PERL_CORE} ) {
- chdir 't';
- @INC = ('../lib', 'lib/');
- }
- else {
- unshift @INC, 't/lib/';
- }
+ unshift @INC, 't/lib/';
}
chdir 't';
Modified: trunk/libextutils-command-perl/t/eu_command.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-command-perl/t/eu_command.t?rev=71383&op=diff
==============================================================================
--- trunk/libextutils-command-perl/t/eu_command.t (original)
+++ trunk/libextutils-command-perl/t/eu_command.t Mon Mar 14 01:05:00 2011
@@ -1,13 +1,7 @@
#!/usr/bin/perl -w
BEGIN {
- if( $ENV{PERL_CORE} ) {
- chdir 't';
- @INC = ('../lib', 'lib/');
- }
- else {
- unshift @INC, 't/lib/';
- }
+ unshift @INC, 't/lib/';
}
chdir 't';
@@ -48,7 +42,7 @@
@ARGV = ($self, $self);
cat();
- is( scalar( $$out =~ s/use_ok\( 'ExtUtils::Command'//g), 2,
+ is( scalar( $$out =~ s/use_ok\( 'ExtUtils::Command'//g), 2,
'concatenation worked' );
# the truth value here is reversed -- Perl true is shell false
More information about the Pkg-perl-cvs-commits
mailing list