r20478 - in /branches/upstream/libgetopt-argvfile-perl/current: ./ demos/ t/
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Wed May 28 15:41:59 UTC 2008
Author: gregoa
Date: Wed May 28 15:41:59 2008
New Revision: 20478
URL: http://svn.debian.org/wsvn/?sc=1&rev=20478
Log:
[svn-upgrade] Integrating new upstream version, libgetopt-argvfile-perl (1.11)
Added:
branches/upstream/libgetopt-argvfile-perl/current/Changes
branches/upstream/libgetopt-argvfile-perl/current/META.yml
branches/upstream/libgetopt-argvfile-perl/current/demos/
branches/upstream/libgetopt-argvfile-perl/current/demos/defaultOptionFiles.pl
branches/upstream/libgetopt-argvfile-perl/current/demos/defaultUse.pl
branches/upstream/libgetopt-argvfile-perl/current/demos/delayedProcessing.pl
branches/upstream/libgetopt-argvfile-perl/current/t/pod-coverage.t
branches/upstream/libgetopt-argvfile-perl/current/t/pod.t
Modified:
branches/upstream/libgetopt-argvfile-perl/current/ArgvFile.pm
branches/upstream/libgetopt-argvfile-perl/current/MANIFEST
branches/upstream/libgetopt-argvfile-perl/current/Makefile.PL
branches/upstream/libgetopt-argvfile-perl/current/README
branches/upstream/libgetopt-argvfile-perl/current/t/.resolvepathes.t
branches/upstream/libgetopt-argvfile-perl/current/t/resolvepathes.t
Modified: branches/upstream/libgetopt-argvfile-perl/current/ArgvFile.pm
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/ArgvFile.pm?rev=20478&op=diff
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/ArgvFile.pm (original)
+++ branches/upstream/libgetopt-argvfile-perl/current/ArgvFile.pm Wed May 28 15:41:59 2008
@@ -4,6 +4,15 @@
# ---------------------------------------------------------------------------------------
# version | date | author | changes
# ---------------------------------------------------------------------------------------
+# 1.11 |17.04.07| JSTENZEL | renamed fileOptions2prefixes() into _fileOptions2prefixes(),
+# | | | in order to avoid POD documentation because it is an
+# | | | internal helper function;
+# | | JSTENZEL | slight adaptations after complaints of perlcritic;
+# | | JSTENZEL | added POD hints that GetOptions() is imported from
+# | | | Getopt::Long and not defined in Getopt::ArgvFile;
+# | | JSTENZEL | POD: bugfix in GetOptions() calls, %options hash needs to
+# | | | be passed in as reference;
+# |21.04.07| JSTENZEL | POD: bugfix in -fileOption example;
# 1.10 |05.01.05| JSTENZEL | added options resolveRelativePathes and resolveEnvVars;
# 1.09 |19.10.04| JSTENZEL | option -startupFilename now accepts array references both
# | | | directly set up and supplied by a callback;
@@ -42,7 +51,7 @@
=head1 VERSION
-This manual describes version B<1.10>.
+This manual describes version B<1.11>.
=head1 SYNOPSIS
@@ -56,7 +65,7 @@
...
# evaluate options, e.g. this common way:
- GetOptions(%options, 'any');
+ GetOptions(\%options, 'any'); # this function is defined in Getopt::Long
Or suppress option hint processing when the module is loaded, to
perform it later on:
@@ -72,7 +81,7 @@
Getopt::ArgvFile::argvFile(default=>1);
# evaluate options, e.g. this common way:
- GetOptions(%options, 'any');
+ GetOptions(\%options, 'any'); # this function is defined in Getopt::Long
Or use the traditional two step invocation of module loading with
I<symbol import> and I<explicit> option file handling:
@@ -90,7 +99,7 @@
argvFile(default=>1);
# evaluate options, e.g. this common way:
- GetOptions(%options, 'any');
+ GetOptions(\%options, 'any'); # this function is defined in Getopt::Long
If options should be processed into another array, this can be done this way:
@@ -112,7 +121,7 @@
...
# replace file hints by the options stored in the files
- argvFile(fileOption=>'option', array=>\@options);
+ argvFile(fileOption=>'options', array=>\@options);
=head1 DESCRIPTION
@@ -208,15 +217,15 @@
# PACKAGE SECTION ###############################################
+# declare namespace
+package Getopt::ArgvFile;
+
+# declare your revision (and use it to avoid a warning)
+$VERSION=1.11;
+$VERSION=$VERSION;
+
# force Perl version
require 5.003;
-
-# declare namespace
-package Getopt::ArgvFile;
-
-# declare your revision (and use it to avoid a warning)
-$VERSION="1.10";
-$VERSION=$VERSION;
=pod
@@ -423,7 +432,7 @@
A path is resolved I<relative to the option file> it is found in.
-B<Envrionment variables>
+B<Environment variables>
Similar to relative pathes, environment variables are handled differently
depending if the option is specified at the commandline or from an option
@@ -546,7 +555,7 @@
B<Processing an alternative array>
-However the function was designed to process @ARGV, it is possible to
+Although the function was designed to process @ARGV, it is possible to
process another array as well if you prefer. To do this, simply pass
a I<reference> to this array by parameter B<array>.
@@ -613,7 +622,7 @@
my $casesensitiveFilenames=$^O!~/^(?:dos|os2|MSWin32)/i;
# check and get parameters
- confess("[BUG] Getopt::ArgvFile::argvFile() uses named parameters, please provide name value pairs.") if @_ % 2;
+ confess('[BUG] Getopt::ArgvFile::argvFile() uses named parameters, please provide name value pairs.') if @_ % 2;
my %switches=@_;
# perform more parameter checks
@@ -658,7 +667,7 @@
unless ref($startupFilenames);
# substitute file options by prefixes, if necessary
- fileOptions2prefixes($fileOption, $prefix, $arrayRef) if $fileOption;
+ _fileOptions2prefixes($fileOption, $prefix, $arrayRef) if $fileOption;
# init startup file paths
(
@@ -775,7 +784,7 @@
# as they would get lost otherwise (other backslash removals are welcome!)
s/\\\$/\\\\\$/g;
my (@shellwords)=shellwords($_);
-
+
# replace environment variables, if necessary
if (exists $switches{resolveEnvVars})
{
@@ -827,7 +836,7 @@
}
# substitute file options by prefixes, if necessary
- fileOptions2prefixes($fileOption, $prefix, \@c) if $fileOption;
+ _fileOptions2prefixes($fileOption, $prefix, \@c) if $fileOption;
# replace original array by expanded array
@$arrayRef=@c;
@@ -859,7 +868,7 @@
# preprocess an array to convert the -fileOption string into a prefix
-sub fileOptions2prefixes
+sub _fileOptions2prefixes
{
# get and check parameters
my ($fileOption, $prefix, $arrayRef)=@_;
@@ -873,7 +882,7 @@
$options=~s/($optionPrefixPattern$fileOption\x01+)/$prefix/g;
# replace original array
- @$arrayRef=split("\x01\x01\x01", $options);;
+ @$arrayRef=split(/\x01\x01\x01/, $options);;
}
}
@@ -944,7 +953,7 @@
=head1 LICENSE
-Copyright (c) 1993-2005 Jochen Stenzel. All rights reserved.
+Copyright (c) 1993-2007 Jochen Stenzel. All rights reserved.
This program is free software, you can redistribute it and/or modify it
under the terms of the Artistic License distributed with Perl version
Added: branches/upstream/libgetopt-argvfile-perl/current/Changes
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/Changes?rev=20478&op=file
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/Changes (added)
+++ branches/upstream/libgetopt-argvfile-perl/current/Changes Wed May 28 15:41:59 2008
@@ -1,0 +1,179 @@
+
+1.11 This is a distribution maintenance release. No new
+ features or bugfixes were added, there is no need
+ to update from version 1.10.
+
+ There are two reasons for the changes: a new version
+ of CPAN.pm and the CPANTS code quality checks.
+
+ Adapted tests to run with CPAN.pm 1.90.
+
+ Moved change log from README section "What's new" to
+ this file.
+
+ Added META.yaml.
+
+ Added demos.
+
+ Added POD test scripts: t/pod.t and t/pod-coverage.t.
+
+ POD optimizations and fixes.
+
+
+1.10 New options "resolveRelativePathes" and "resolveEnvVars"
+ make it behave like the shell in resolving relative
+ pathes (relative to the option file they are used in)
+ and environment variables.
+
+1.09 This version integrates several improvements suggested
+ by Kathryn Andersen, provided as complete patches that
+ were carefully prepared. Thanks!
+
+ First, option "startupFilename" accepts *lists* now,
+ both directly provided and supplied by a callback.
+ For each startup directory, the list is searched for
+ the name of an existing file. The first matching file
+ gets processed.
+
+ Example:
+
+ use Getopt::ArgvFile startupFilenames=>[qw(.rc .cfg)];
+
+ searches for startup files named ".rc" and ".cfg"
+ (in this order), using the first file available
+ in each startup path.
+
+ Second, a new option "fileOption" allows to declare
+ an option usable instead of an option file *prefix*,
+ intended to make option files more familiar to new
+ users.
+
+ Example:
+
+ use Getopt::ArgvFile fileOption=>'options';
+
+ allows to specify an option file by
+
+ ... -options file ...
+
+ , which is a synonym for (the still valid)
+
+ ... @file
+
+ Nesting and cascading still work as before.
+
+ Example:
+
+ ... -options -options file
+
+ is a synonym for (the still valid)
+
+ ... @@file
+
+ syntax.
+
+ Besides these patches, Test::More::eq_array() turned
+ out to be buggy (in older versions of Test::More, at
+ least), so tests now use the well working
+ Test::More::is_deeply() function.
+
+ Finally, the results of "startupFilename" callbacks
+ were not checked yet. This is fixed.
+
+1.08 In very rare circumstances, the one line processing
+ via use() that was introduced with 1.07 could break
+ older scripts written for 1.06 or before. These were
+ the conditions:
+
+ * The module was loaded by "use Getopt::ArgvFile",
+ without import hints.
+
+ * Therefore, &argvFile was not imported into the
+ loaders namespace, so it had to be called via full
+ name as "Getopt::ArgvFile::argvFile(...)".
+
+ * The loader made use of cascading (was aware of
+ multiple prefixes like in "@@optionfile", of which
+ only the first level should be processed by the
+ call of argvFile() and remaining hints should be
+ passed through to another script).
+
+ In such cases, option hints were processed *twice*
+ unintentionally with 1.07, cause both "use" and the
+ explicit call of argvFile() invoked this processing,
+ which caused *two* level hints to be resolved instead
+ of one.
+
+ To adapt such scripts, 1.08 introduces a "justload"
+ switch for "use":
+
+ use Getopt::ArgvFile justload=>1;
+
+ This loads the module, but suppresses further operations.
+
+ Alternatively, one could remove the explicit call
+ of Getopt::ArgvFile::argvFile() from affected scripts.
+
+ -
+
+ More tests added.
+
+1.07 Bugfix: a missing HOME environment variable was not
+ handled correctly in all cases, causing error messages.
+ Thanks to Matthew Brett for the bug report.
+
+ -
+
+ It is now possible to process option files while
+ the module is loaded.
+
+ Before, a typical use looked like this:
+
+ use Getopt::ArgvFile qw(argvFile);
+ ...
+ argvFile(default=>1);
+
+ While this is still possible and valid, it can be
+ reduced to one line now:
+
+ use Getopt::ArgvFile default=>1;
+
+ Just pass the parameters of argvFile() to use().
+ Thanks to johanl AT darsermann.com for the
+ suggestion.
+
+
+1.06 argvFile() takes a new option "startupFilename"
+ to let users specify what scheme should be used
+ to find startup files (thanks to Helmut Steinbach
+ for the initial idea). Names may be specified
+ directly or by a reference to a function which
+ will then be invoked with the scriptname to
+ provide the filename dynamically.
+
+1.05 Using File::Spec::Functions to build filenames
+ more portable.
+
+ Using Cwd::abs_path() now to check if several
+ startup file locations are identical.
+
+ Added support for startup files in the *current*
+ directory (thanks to Helmut Steinbach for this
+ suggestion).
+
+ Switched to Test::More (for installation checks).
+
+1.04 fixed a bug: if the script directory was identical
+ to the users home and both default and home setting
+ were used, the default options were read twice
+ (thanks to Manfred Kuegler for the report).
+
+1.03 introduced new parameter "prefix".
+ POD comments in option files are supported now
+ (according to an idea of Joe Pepin).
+
+1.02 introduced new parameter "array".
+
+1.01 came with an updated README to reflect that the
+ required module Text::ParseWords 3.1 is available
+ on CPAN now.
Modified: branches/upstream/libgetopt-argvfile-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/MANIFEST?rev=20478&op=diff
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/MANIFEST (original)
+++ branches/upstream/libgetopt-argvfile-perl/current/MANIFEST Wed May 28 15:41:59 2008
@@ -1,7 +1,12 @@
ArgvFile.pm
+Changes
MANIFEST
+META.yml
Makefile.PL
README
+demos/defaultOptionFiles.pl
+demos/defaultUse.pl
+demos/delayedProcessing.pl
t/.base.t
t/.base.t.cfg
t/.expandenv.t
@@ -14,7 +19,9 @@
t/expandenv.t
t/fileopt.t
t/noHOMEvar.t
+t/pod-coverage.t
+t/pod.t
t/prefix.t
t/resolvepathes.t
t/use1.t
-t/use2.t
+t/use2.t
Added: branches/upstream/libgetopt-argvfile-perl/current/META.yml
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/META.yml?rev=20478&op=file
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/META.yml (added)
+++ branches/upstream/libgetopt-argvfile-perl/current/META.yml Wed May 28 15:41:59 2008
@@ -1,0 +1,14 @@
+--- #YAML:1.0
+name: Getopt-ArgvFile
+version: 1.11
+abstract: ~
+license: artistic
+generated_by: ExtUtils::MakeMaker version 6.32
+distribution_type: module
+requires:
+ Test::Harness: 1.25
+ Test::More: 0.11
+ Text::ParseWords: 3.1
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.2.html
+ version: 1.2
Modified: branches/upstream/libgetopt-argvfile-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/Makefile.PL?rev=20478&op=diff
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/Makefile.PL (original)
+++ branches/upstream/libgetopt-argvfile-perl/current/Makefile.PL Wed May 28 15:41:59 2008
@@ -11,13 +11,15 @@
WriteMakefile(
NAME => 'Getopt::ArgvFile',
VERSION_FROM => 'ArgvFile.pm',
- PREREQ_PM => {
- Text::ParseWords => 3.1,
- Test::Harness => 1.25,
- Test::More => 0.11,
- },
+ LICENSE => 'artistic',
+
+ PREREQ_PM => {
+ Text::ParseWords => 3.1,
+ Test::Harness => 1.25,
+ Test::More => 0.11,
+ },
dist => {
COMPRESS => 'gzip -9',
- SUFFIX => 'tgz',
+ SUFFIX => 'tar.gz',
},
);
Modified: branches/upstream/libgetopt-argvfile-perl/current/README
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/README?rev=20478&op=diff
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/README (original)
+++ branches/upstream/libgetopt-argvfile-perl/current/README Wed May 28 15:41:59 2008
@@ -2,7 +2,7 @@
Release
=======
-Getopt::ArgvFile 1.10.
+Getopt::ArgvFile 1.11.
Overview
@@ -135,163 +135,7 @@
What's new?
===========
-1.10 New options "resolveRelativePathes" and "resolveEnvVars"
- make it behave like the shell in resolving relative
- pathes (relative to the option file they are used in)
- and environment variables.
-
-1.09 This version integrates several improvements suggested
- by Kathryn Andersen, provided as complete patches that
- were carefully prepared. Thanks!
-
- First, option "startupFilename" accepts *lists* now,
- both directly provided and supplied by a callback.
- For each startup directory, the list is searched for
- the name of an existing file. The first matching file
- gets processed.
-
- Example:
-
- use Getopt::ArgvFile startupFilenames=>[qw(.rc .cfg)];
-
- searches for startup files named ".rc" and ".cfg"
- (in this order), using the first file available
- in each startup path.
-
- Second, a new option "fileOption" allows to declare
- an option usable instead of an option file *prefix*,
- intended to make option files more familiar to new
- users.
-
- Example:
-
- use Getopt::ArgvFile fileOption=>'options';
-
- allows to specify an option file by
-
- ... -options file ...
-
- , which is a synonym for (the still valid)
-
- ... @file
-
- Nesting and cascading still work as before.
-
- Example:
-
- ... -options -options file
-
- is a synonym for (the still valid)
-
- ... @@file
-
- syntax.
-
- Besides these patches, Test::More::eq_array() turned
- out to be buggy (in older versions of Test::More, at
- least), so tests now use the well working
- Test::More::is_deeply() function.
-
- Finally, the results of "startupFilename" callbacks
- were not checked yet. This is fixed.
-
-1.08 In very rare circumstances, the one line processing
- via use() that was introduced with 1.07 could break
- older scripts written for 1.06 or before. These were
- the conditions:
-
- * The module was loaded by "use Getopt::ArgvFile",
- without import hints.
-
- * Therefore, &argvFile was not imported into the
- loaders namespace, so it had to be called via full
- name as "Getopt::ArgvFile::argvFile(...)".
-
- * The loader made use of cascading (was aware of
- multiple prefixes like in "@@optionfile", of which
- only the first level should be processed by the
- call of argvFile() and remaining hints should be
- passed through to another script).
-
- In such cases, option hints were processed *twice*
- unintentionally with 1.07, cause both "use" and the
- explicit call of argvFile() invoked this processing,
- which caused *two* level hints to be resolved instead
- of one.
-
- To adapt such scripts, 1.08 introduces a "justload"
- switch for "use":
-
- use Getopt::ArgvFile justload=>1;
-
- This loads the module, but suppresses further operations.
-
- Alternatively, one could remove the explicit call
- of Getopt::ArgvFile::argvFile() from affected scripts.
-
- -
-
- More tests added.
-
-1.07 Bugfix: a missing HOME environment variable was not
- handled correctly in all cases, causing error messages.
- Thanks to Matthew Brett for the bug report.
-
- -
-
- It is now possible to process option files while
- the module is loaded.
-
- Before, a typical use looked like this:
-
- use Getopt::ArgvFile qw(argvFile);
- ...
- argvFile(default=>1);
-
- While this is still possible and valid, it can be
- reduced to one line now:
-
- use Getopt::ArgvFile default=>1;
-
- Just pass the parameters of argvFile() to use().
- Thanks to johanl AT darsermann.com for the
- suggestion.
-
-
-1.06 argvFile() takes a new option "startupFilename"
- to let users specify what scheme should be used
- to find startup files (thanks to Helmut Steinbach
- for the initial idea). Names may be specified
- directly or by a reference to a function which
- will then be invoked with the scriptname to
- provide the filename dynamically.
-
-1.05 Using File::Spec::Functions to build filenames
- more portable.
-
- Using Cwd::abs_path() now to check if several
- startup file locations are identical.
-
- Added support for startup files in the *current*
- directory (thanks to Helmut Steinbach for this
- suggestion).
-
- Switched to Test::More (for installation checks).
-
-1.04 fixed a bug: if the script directory was identical
- to the users home and both default and home setting
- were used, the default options were read twice
- (thanks to Manfred Kuegler for the report).
-
-1.03 introduced new parameter "prefix".
- POD comments in option files are supported now
- (according to an idea of Joe Pepin).
-
-1.02 introduced new parameter "array".
-
-1.01 came with an updated README to reflect that the
- required module Text::ParseWords 3.1 is available
- on CPAN now.
+Please see the changelog ("Changes") for a distribution history.
Problems?
@@ -304,7 +148,7 @@
Author, Copyright, License
==========================
-Copyright (c) 1993-2005 Jochen Stenzel. All rights reserved.
+Copyright (c) 1993-2007 Jochen Stenzel. All rights reserved.
This module is free software, you can redistribute it and/or modify it
under the terms of the Artistic License distributed with Perl version
Added: branches/upstream/libgetopt-argvfile-perl/current/demos/defaultOptionFiles.pl
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/demos/defaultOptionFiles.pl?rev=20478&op=file
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/demos/defaultOptionFiles.pl (added)
+++ branches/upstream/libgetopt-argvfile-perl/current/demos/defaultOptionFiles.pl Wed May 28 15:41:59 2008
@@ -1,0 +1,35 @@
+
+
+# This demo is part of the Getopt::ArgvFile distribution.
+# It demonstrates how to use the module to automatically
+# process default options files.
+# Jochen Stenzel, 2007.
+
+
+# pragmata
+use strict;
+
+
+
+
+# ===> load Getopt::Argv file to process option files,
+# .<script name> (.defaultOptionFiles.pl) in the scripts directory
+# is processed automatically, if available,
+# .<script name> (.defaultOptionFiles.pl) in users home directory
+# is processed automatically, if available,
+# @ARGV is adapted
+use Getopt::ArgvFile default=>1, # read .defaultOptionFiles.pl in script directory, if available;
+ home=>1; # read .defaultOptionFiles.pl in users home directory, if available;
+
+
+# load an options processing module of your choice
+use Getopt::Long;
+
+# process options
+my %options;
+GetOptions(
+ \%options,
+
+ 'example',
+ 'demo',
+ );
Added: branches/upstream/libgetopt-argvfile-perl/current/demos/defaultUse.pl
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/demos/defaultUse.pl?rev=20478&op=file
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/demos/defaultUse.pl (added)
+++ branches/upstream/libgetopt-argvfile-perl/current/demos/defaultUse.pl Wed May 28 15:41:59 2008
@@ -1,0 +1,31 @@
+
+
+# This demo is part of the Getopt::ArgvFile distribution.
+# It demonstrates the standard use of the module.
+# Jochen Stenzel, 2007.
+
+
+# pragmata
+use strict;
+
+
+
+# ===> load Getopt::Argv file to process option files,
+# no automatic processing of default option files,
+# @ARGV is adapted
+use Getopt::ArgvFile;
+
+
+
+
+# load an options processing module of your choice
+use Getopt::Long;
+
+# process options
+my %options;
+GetOptions(
+ \%options,
+
+ 'example',
+ 'demo',
+ );
Added: branches/upstream/libgetopt-argvfile-perl/current/demos/delayedProcessing.pl
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/demos/delayedProcessing.pl?rev=20478&op=file
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/demos/delayedProcessing.pl (added)
+++ branches/upstream/libgetopt-argvfile-perl/current/demos/delayedProcessing.pl Wed May 28 15:41:59 2008
@@ -1,0 +1,34 @@
+
+
+# This demo is part of the Getopt::ArgvFile distribution.
+# It demonstrates how delay options processing until a
+# separate function call.
+# Jochen Stenzel, 2007.
+
+
+# pragmata
+use strict;
+
+
+
+
+# ===> load Getopt::Argvm but do *not* process option files.
+use Getopt::ArgvFile justload=>1;
+
+# load an options processing module of your choice
+use Getopt::Long;
+
+
+# ===> *now* process option files
+Getopt::ArgvFile::argvFile();
+
+
+
+# process options
+my %options;
+GetOptions(
+ \%options,
+
+ 'example',
+ 'demo',
+ );
Modified: branches/upstream/libgetopt-argvfile-perl/current/t/.resolvepathes.t
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/t/.resolvepathes.t?rev=20478&op=diff
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/t/.resolvepathes.t (original)
+++ branches/upstream/libgetopt-argvfile-perl/current/t/.resolvepathes.t Wed May 28 15:41:59 2008
@@ -13,7 +13,7 @@
# back to first file (relative to *this* file!!)
-file1
-.././../././Getopt-ArgvFile-1.10/t/file1
+../././t/file1
# now, for a nested option file (relative to *this* file!!)
@././././.resolvepathes2.t
Added: branches/upstream/libgetopt-argvfile-perl/current/t/pod-coverage.t
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/t/pod-coverage.t?rev=20478&op=file
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/t/pod-coverage.t (added)
+++ branches/upstream/libgetopt-argvfile-perl/current/t/pod-coverage.t Wed May 28 15:41:59 2008
@@ -1,0 +1,11 @@
+
+# set pragma
+use strict;
+
+# load test module
+use Test::More;
+
+# test POD coverage if Test::Pod::Coverage is installed
+eval "use Test::Pod::Coverage 1.00";
+plan skip_all => "Test::Pod::Coverage 1.00 required for testing POD coverage" if $@;
+all_pod_coverage_ok();
Added: branches/upstream/libgetopt-argvfile-perl/current/t/pod.t
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/t/pod.t?rev=20478&op=file
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/t/pod.t (added)
+++ branches/upstream/libgetopt-argvfile-perl/current/t/pod.t Wed May 28 15:41:59 2008
@@ -1,0 +1,12 @@
+
+# set pragma
+use strict;
+
+# load test module
+use Test::More;
+
+# test POD if Test::Pod is installed
+eval "use Test::Pod 1.00";
+plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
+all_pod_files_ok();
+
Modified: branches/upstream/libgetopt-argvfile-perl/current/t/resolvepathes.t
URL: http://svn.debian.org/wsvn/branches/upstream/libgetopt-argvfile-perl/current/t/resolvepathes.t?rev=20478&op=diff
==============================================================================
--- branches/upstream/libgetopt-argvfile-perl/current/t/resolvepathes.t (original)
+++ branches/upstream/libgetopt-argvfile-perl/current/t/resolvepathes.t Wed May 28 15:41:59 2008
@@ -27,7 +27,7 @@
'./../file2',
'-file1',
- ".././../././Getopt-ArgvFile-$Getopt::ArgvFile::VERSION/t/file1",
+ "../././t/file1",
);
# perform first check
More information about the Pkg-perl-cvs-commits
mailing list