r26971 - in /branches/upstream/libfile-sharedir-par-perl/current: Changes MANIFEST META.yml README lib/File/ShareDir/PAR.pm
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Mon Nov 17 18:17:22 UTC 2008
Author: gregoa
Date: Mon Nov 17 18:17:20 2008
New Revision: 26971
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=26971
Log:
[svn-upgrade] Integrating new upstream version, libfile-sharedir-par-perl (0.03)
Added:
branches/upstream/libfile-sharedir-par-perl/current/README
Modified:
branches/upstream/libfile-sharedir-par-perl/current/Changes
branches/upstream/libfile-sharedir-par-perl/current/MANIFEST
branches/upstream/libfile-sharedir-par-perl/current/META.yml
branches/upstream/libfile-sharedir-par-perl/current/lib/File/ShareDir/PAR.pm
Modified: branches/upstream/libfile-sharedir-par-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-sharedir-par-perl/current/Changes?rev=26971&op=diff
==============================================================================
--- branches/upstream/libfile-sharedir-par-perl/current/Changes (original)
+++ branches/upstream/libfile-sharedir-par-perl/current/Changes Mon Nov 17 18:17:20 2008
@@ -1,4 +1,7 @@
Revision history for Perl extension File::ShareDir::PAR
+
+0.03 Sat 15 Nov 2008
+ - Fix issue on Win32 wrt path separators.
0.02 Wed 15 Oct 2008
- Fix 03 tests with par: previously, got spurious fails from
Modified: branches/upstream/libfile-sharedir-par-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-sharedir-par-perl/current/MANIFEST?rev=26971&op=diff
==============================================================================
--- branches/upstream/libfile-sharedir-par-perl/current/MANIFEST (original)
+++ branches/upstream/libfile-sharedir-par-perl/current/MANIFEST Mon Nov 17 18:17:20 2008
@@ -14,6 +14,7 @@
Makefile.PL
MANIFEST This list of files
META.yml
+README
share/sample.txt
share/subdir/sample.txt
t/01_compile.t
Modified: branches/upstream/libfile-sharedir-par-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-sharedir-par-perl/current/META.yml?rev=26971&op=diff
==============================================================================
--- branches/upstream/libfile-sharedir-par-perl/current/META.yml (original)
+++ branches/upstream/libfile-sharedir-par-perl/current/META.yml Mon Nov 17 18:17:20 2008
@@ -30,4 +30,4 @@
perl: 5.005
resources:
license: http://dev.perl.org/licenses/
-version: 0.02
+version: 0.03
Added: branches/upstream/libfile-sharedir-par-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-sharedir-par-perl/current/README?rev=26971&op=file
==============================================================================
--- branches/upstream/libfile-sharedir-par-perl/current/README (added)
+++ branches/upstream/libfile-sharedir-par-perl/current/README Mon Nov 17 18:17:20 2008
@@ -1,0 +1,84 @@
+NAME
+ File::ShareDir::PAR - File::ShareDir with PAR support
+
+SYNOPSIS
+ use File::SharedDir::PAR ':ALL';
+ # exact same interface as the normal File::ShareDir:
+
+ # Where are distribution-level shared data files kept
+ $dir = dist_dir('File-ShareDir');
+
+ # Where are module-level shared data files kept
+ $dir = module_dir('File::ShareDir');
+
+ # Find a specific file in our dist/module shared dir
+ $file = dist_file( 'File-ShareDir', 'file/name.txt');
+ $file = module_file('File::ShareDir', 'file/name.txt');
+
+ # Like module_file, but search up the inheritance tree
+ $file = class_file( 'Foo::Bar', 'file/name.txt' );
+
+WARNING
+ This module contains *highly experimental* code. If you want to load
+ modules from ".par" files using PAR and then access their shared
+ directory using File::ShareDir, you probably have no choice but to use
+ it. But beware, here be dragons.
+
+DESCRIPTION
+ "File::ShareDir::PAR" provides the same functionality as File::ShareDir
+ but tries hard to be compatible with PAR packaged applications.
+
+ The problem is, that the concept of having a distribution or module
+ specific *share* directory becomes a little hazy when you're loading
+ everything from a single file. PAR uses an @INC hook to intercept any
+ attempt to load a module. File::ShareDir uses the directory structure
+ that is typically found in the directories that are listed in @INC for
+ storing the shared data. In a "PAR" enviroment, this is not necessarily
+ possible.
+
+ When you call one of the functions that this module provides, it will
+ take care to search in any of the currently loaded ".par" files before
+ scanning @INC. This is the same order of preference you get for loading
+ modules when PAR is in effect. If the path or file you are asking for is
+ found in one of the loaded ".par" files, that containing ".par" file is
+ extracted and the path returned will point to the extracted copy on
+ disk.
+
+ Depending on how you're using PAR, the files that are extracted this way
+ are either cleaned up after program termination or cached for further
+ executions. Either way, you're safe if you use the shared data as
+ read-only data. If you write to it, your changes may be lost after the
+ program ends.
+
+ For any further usage information, including the list of exportable
+ functions, please refer to the documentation of File::ShareDir.
+
+SUPPORT
+ Bugs should always be submitted via the CPAN bug tracker
+
+ <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=File-ShareDir-PAR>
+
+ For other issues, contact the PAR mailing list: <par at perl.org>
+
+AUTHOR
+ Steffen Mueller <smueller at cpan.org>
+
+ The code was adapted from Adam Kennedy's work on "File::ShareDir"
+
+SEE ALSO
+ File::ShareDir, File::HomeDir, Module::Install, Module::Install::Share
+
+COPYRIGHT AND LICENSE
+ Copyright (c) 2008 Steffen Mueller This program is free software; you
+ can redistribute it and/or modify it under the same terms as Perl
+ itself.
+
+ The portions of code that were copied from "File::ShareDir" are:
+
+ Copyright (c) 2005, 2006 Adam Kennedy. This program is free software;
+ you can redistribute it and/or modify it under the same terms as Perl
+ itself.
+
+ The full text of the license can be found in the LICENSE file included
+ with this module.
+
Modified: branches/upstream/libfile-sharedir-par-perl/current/lib/File/ShareDir/PAR.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-sharedir-par-perl/current/lib/File/ShareDir/PAR.pm?rev=26971&op=diff
==============================================================================
--- branches/upstream/libfile-sharedir-par-perl/current/lib/File/ShareDir/PAR.pm (original)
+++ branches/upstream/libfile-sharedir-par-perl/current/lib/File/ShareDir/PAR.pm Mon Nov 17 18:17:20 2008
@@ -80,7 +80,7 @@
use vars qw{$VERSION @EXPORT_OK %EXPORT_TAGS %CLEANUP_DIRS};
BEGIN {
- $VERSION = '0.02';
+ $VERSION = '0.03';
@EXPORT_OK = qw{dist_dir dist_file module_dir module_file class_file};
%EXPORT_TAGS = (
ALL => [ @EXPORT_OK ],
@@ -113,13 +113,14 @@
$file =~ s/\/+$//;
- my @files = (
+ my @files = map {s/\\/\//g; $_} (
$file, "lib/$file", "arch/$file",
"$arch/$file", "$ver/$file", "$ver/$arch/$file"
);
@files = map {($_, "$_/")} @files;
#use Data::Dumper; warn Dumper \@files;
foreach my $zip (@PAR::LibCache) {
+ my @m = $zip->memberNames();
my $member = PAR::_first_member($zip, @files) or next;
return($member, $zip);
}
More information about the Pkg-perl-cvs-commits
mailing list