r60545 - in /branches/upstream/libtext-recordparser-perl/current: ./ bin/ lib/Text/ lib/Text/RecordParser/
carnil-guest at users.alioth.debian.org
carnil-guest at users.alioth.debian.org
Sun Jul 25 14:14:11 UTC 2010
Author: carnil-guest
Date: Sun Jul 25 14:09:00 2010
New Revision: 60545
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=60545
Log:
[svn-upgrade] new version libtext-recordparser-perl (1.5.0)
Added:
branches/upstream/libtext-recordparser-perl/current/bin/foo.png (with props)
Modified:
branches/upstream/libtext-recordparser-perl/current/Build.PL
branches/upstream/libtext-recordparser-perl/current/Changes
branches/upstream/libtext-recordparser-perl/current/MANIFEST
branches/upstream/libtext-recordparser-perl/current/META.yml
branches/upstream/libtext-recordparser-perl/current/Makefile.PL
branches/upstream/libtext-recordparser-perl/current/README
branches/upstream/libtext-recordparser-perl/current/bin/tab2graph
branches/upstream/libtext-recordparser-perl/current/bin/tablify
branches/upstream/libtext-recordparser-perl/current/bin/tabmerge
branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser.pm
branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Object.pm
branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Tab.pm
Modified: branches/upstream/libtext-recordparser-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/Build.PL?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/Build.PL (original)
+++ branches/upstream/libtext-recordparser-perl/current/Build.PL Sun Jul 25 14:09:00 2010
@@ -7,7 +7,6 @@
dist_author => 'Ken Youens-Clark <kclark at cpan.org>',
dist_version_from => 'lib/Text/RecordParser.pm',
add_to_cleanup => [ '$(DISTNAME)-$(VERSION).tar.gz' ],
- create_makefile_pl => 'passthrough',
create_readme => 1,
dist_abstract => 'Parse record-oriented data in a text file',
license => 'gpl',
Modified: branches/upstream/libtext-recordparser-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/Changes?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/Changes (original)
+++ branches/upstream/libtext-recordparser-perl/current/Changes Sun Jul 25 14:09:00 2010
@@ -1,4 +1,12 @@
-1.3.0 April 20, 2009
+1.5.0 July 21 2010
+
+- Some small changeds to be more defensive about non-existent fields
+
+1.4.0 February 18 2010
+
+- Not sure, but I made a release here
+
+1.3.0 April 20 2009
- Guess record separator based on file extension
- Automatically escape single quotes in incoming text for parse_line
Modified: branches/upstream/libtext-recordparser-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/MANIFEST?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/MANIFEST (original)
+++ branches/upstream/libtext-recordparser-perl/current/MANIFEST Sun Jul 25 14:09:00 2010
@@ -1,3 +1,4 @@
+bin/foo.png
bin/tab2graph
bin/tablify
bin/tabmerge
Modified: branches/upstream/libtext-recordparser-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/META.yml?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/META.yml (original)
+++ branches/upstream/libtext-recordparser-perl/current/META.yml Sun Jul 25 14:09:00 2010
@@ -1,12 +1,32 @@
---
-name: Text-RecordParser
-version: 1.4.0
+abstract: 'Parse record-oriented data in a text file'
author:
- 'Ken Youens-Clark <kclark at cpan.org>'
-abstract: Parse record-oriented data in a text file
+build_requires:
+ Test::Exception: 0
+ Test::More: 0
+configure_requires:
+ Module::Build: 0.36
+generated_by: 'Module::Build version 0.3607'
license: gpl
-resources:
- license: ~
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
+name: Text-RecordParser
+provides:
+ Text::RecordParser:
+ file: lib/Text/RecordParser.pm
+ version: v1.5.0
+ Text::RecordParser::Object:
+ file: lib/Text/RecordParser/Object.pm
+ version: v1.4.0
+ Text::RecordParser::Tab:
+ file: lib/Text/RecordParser/Tab.pm
+ version: v1.4.0
+recommends:
+ GraphViz: 0
+ Readonly::XS: 0
+ Text::TabularDisplay: 1.22
requires:
Class::Accessor: 0
IO::Scalar: 0
@@ -14,24 +34,6 @@
List::Util: 0
Readonly: 0
version: 0
-build_requires:
- Test::Exception: 0
- Test::More: 0
-recommends:
- GraphViz: 0
- Readonly::XS: 0
- Text::TabularDisplay: 1.22
-provides:
- Text::RecordParser:
- file: lib/Text/RecordParser.pm
- version: 1.4.0
- Text::RecordParser::Object:
- file: lib/Text/RecordParser/Object.pm
- version: 1.4.0
- Text::RecordParser::Tab:
- file: lib/Text/RecordParser/Tab.pm
- version: 1.4.0
-generated_by: Module::Build version 0.32
-meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.2.html
- version: 1.2
+resources:
+ license: http://opensource.org/licenses/gpl-license.php
+version: v1.5.0
Modified: branches/upstream/libtext-recordparser-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/Makefile.PL?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/Makefile.PL (original)
+++ branches/upstream/libtext-recordparser-perl/current/Makefile.PL Sun Jul 25 14:09:00 2010
@@ -1,32 +1,34 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.32
-
+# Note: this file was auto-generated by Module::Build::Compat version 0.3607
+
unless (eval "use Module::Build::Compat 0.02; 1" ) {
print "This module requires Module::Build to install itself.\n";
-
+
require ExtUtils::MakeMaker;
my $yn = ExtUtils::MakeMaker::prompt
(' Install Module::Build now from CPAN?', 'y');
-
+
unless ($yn =~ /^y/i) {
die " *** Cannot install without Module::Build. Exiting ...\n";
}
-
+
require Cwd;
require File::Spec;
require CPAN;
-
+
# Save this 'cause CPAN will chdir all over the place.
my $cwd = Cwd::cwd();
-
+
CPAN::Shell->install('Module::Build::Compat');
CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
or die "Couldn't install Module::Build, giving up.\n";
-
+
chdir $cwd or die "Cannot chdir() back to $cwd: $!";
}
eval "use Module::Build::Compat 0.02; 1" or die $@;
Module::Build::Compat->run_build_pl(args => \@ARGV);
- exit(0) unless(-e 'Build'); # cpantesters convention
+ my $build_script = 'Build';
+ $build_script .= '.com' if $^O eq 'VMS';
+ exit(0) unless(-e $build_script); # cpantesters convention
require Module::Build;
Module::Build::Compat->write_makefile(build_class => 'Module::Build');
Modified: branches/upstream/libtext-recordparser-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/README?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/README (original)
+++ branches/upstream/libtext-recordparser-perl/current/README Sun Jul 25 14:09:00 2010
@@ -1,8 +1,5 @@
NAME
Text::RecordParser - read record-oriented files
-
-VERSION
- This documentation refers to version 1.4.0.
SYNOPSIS
use Text::RecordParser;
@@ -420,7 +417,7 @@
None known. Please use http://rt.cpan.org/ for reporting bugs.
LICENSE AND COPYRIGHT
- Copyright (C) 2006-9 Ken Youens-Clark. All rights reserved.
+ Copyright (C) 2006-10 Ken Youens-Clark. All rights reserved.
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
Added: branches/upstream/libtext-recordparser-perl/current/bin/foo.png
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/bin/foo.png?rev=60545&op=file
==============================================================================
Binary file - no diff available.
Propchange: branches/upstream/libtext-recordparser-perl/current/bin/foo.png
------------------------------------------------------------------------------
svn:mime-type = application/octet-stream
Modified: branches/upstream/libtext-recordparser-perl/current/bin/tab2graph
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/bin/tab2graph?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/bin/tab2graph (original)
+++ branches/upstream/libtext-recordparser-perl/current/bin/tab2graph Sun Jul 25 14:09:00 2010
@@ -193,7 +193,7 @@
=head1 LICENSE AND COPYRIGHT
-Copyright (C) 2009 Ken Youens-Clark. All rights reserved.
+Copyright (C) 2009-10 Ken Youens-Clark. All rights reserved.
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
Modified: branches/upstream/libtext-recordparser-perl/current/bin/tablify
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/bin/tablify?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/bin/tablify (original)
+++ branches/upstream/libtext-recordparser-perl/current/bin/tablify Sun Jul 25 14:09:00 2010
@@ -179,7 +179,7 @@
}
}
else {
- $max_col_length = max map { length $_ } $p->field_list;
+ $max_col_length = max map { $_ ? length $_ : 0 } $p->field_list;
RECORD:
while ( my $data = $p->fetchrow_hashref ) {
@@ -414,7 +414,7 @@
=head1 LICENSE AND COPYRIGHT
-Copyright (C) 2006-9 Ken Youens-Clark. All rights reserved.
+Copyright (C) 2006-10 Ken Youens-Clark. All rights reserved.
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
Modified: branches/upstream/libtext-recordparser-perl/current/bin/tabmerge
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/bin/tabmerge?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/bin/tabmerge (original)
+++ branches/upstream/libtext-recordparser-perl/current/bin/tabmerge Sun Jul 25 14:09:00 2010
@@ -363,7 +363,7 @@
=head1 LICENSE AND COPYRIGHT
-Copyright (C) 2006-9 Ken Youens-Clark. All rights reserved.
+Copyright (C) 2006-10 Ken Youens-Clark. All rights reserved.
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
Modified: branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser.pm?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser.pm (original)
+++ branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser.pm Sun Jul 25 14:09:00 2010
@@ -3,10 +3,6 @@
=head1 NAME
Text::RecordParser - read record-oriented files
-
-=head1 VERSION
-
-This documentation refers to version 1.4.0.
=head1 SYNOPSIS
@@ -95,7 +91,7 @@
use Readonly;
use Text::ParseWords qw( parse_line );
-our $VERSION = version->new('1.4.0');
+our $VERSION = version->new('1.5.0');
Readonly my $COMMA => q{,};
Readonly my $EMPTY_STR => q{};
@@ -242,8 +238,9 @@
$self->{'field_pos_ordered'} = [ @fields ];
my %field_pos;
- foreach my $i ( 0 .. $#fields ) {
- $field_pos{ $fields[$i] } = $i;
+ for my $i ( 0 .. $#fields ) {
+ next unless $fields[ $i ];
+ $field_pos{ $fields[ $i ] } = $i;
}
$self->{'field_pos'} = \%field_pos;
@@ -499,6 +496,7 @@
my $i = 0;
my %return;
for my $field ( @fields ) {
+ next unless defined $row[ $i ];
$return{ $field } = $row[ $i++ ];
if ( my @aliases = $self->get_field_aliases( $field ) ) {
$return{ $_ } = $return{ $field } for @aliases;
@@ -1149,7 +1147,7 @@
=head1 LICENSE AND COPYRIGHT
-Copyright (C) 2006-9 Ken Youens-Clark. All rights reserved.
+Copyright (C) 2006-10 Ken Youens-Clark. All rights reserved.
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
Modified: branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Object.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Object.pm?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Object.pm (original)
+++ branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Object.pm Sun Jul 25 14:09:00 2010
@@ -67,7 +67,7 @@
=head1 LICENSE AND COPYRIGHT
-Copyright (C) 2009 Ken Youens-Clark. All rights reserved.
+Copyright (C) 2009-10 Ken Youens-Clark. All rights reserved.
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
Modified: branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Tab.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Tab.pm?rev=60545&op=diff
==============================================================================
--- branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Tab.pm (original)
+++ branches/upstream/libtext-recordparser-perl/current/lib/Text/RecordParser/Tab.pm Sun Jul 25 14:09:00 2010
@@ -59,7 +59,7 @@
=head1 LICENSE AND COPYRIGHT
-Copyright (C) 2006-9 Ken Youens-Clark. All rights reserved.
+Copyright (C) 2006-10 Ken Youens-Clark. All rights reserved.
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
More information about the Pkg-perl-cvs-commits
mailing list