r12866 - in /trunk/libhtml-copy-perl: Changes META.yml bin/htmlcopy debian/changelog lib/HTML/Copy.pm
gwolf at users.alioth.debian.org
gwolf at users.alioth.debian.org
Thu Jan 17 19:26:00 UTC 2008
Author: gwolf
Date: Thu Jan 17 19:25:57 2008
New Revision: 12866
URL: http://svn.debian.org/wsvn/?sc=1&rev=12866
Log:
New upstream version
Modified:
trunk/libhtml-copy-perl/Changes
trunk/libhtml-copy-perl/META.yml
trunk/libhtml-copy-perl/bin/htmlcopy
trunk/libhtml-copy-perl/debian/changelog
trunk/libhtml-copy-perl/lib/HTML/Copy.pm
Modified: trunk/libhtml-copy-perl/Changes
URL: http://svn.debian.org/wsvn/trunk/libhtml-copy-perl/Changes?rev=12866&op=diff
==============================================================================
--- trunk/libhtml-copy-perl/Changes (original)
+++ trunk/libhtml-copy-perl/Changes Thu Jan 17 19:25:57 2008
@@ -1,4 +1,7 @@
Revision history for Perl extension HTML::Copy.
+
+1.23 2008-01-16
+ * Add error handling routine when a souce file can't be opened.
1.22 2007-08-10
* add HTTP::Headers to Makefile.PL as a prerequired module(PREREQ_PM).
Modified: trunk/libhtml-copy-perl/META.yml
URL: http://svn.debian.org/wsvn/trunk/libhtml-copy-perl/META.yml?rev=12866&op=diff
==============================================================================
--- trunk/libhtml-copy-perl/META.yml (original)
+++ trunk/libhtml-copy-perl/META.yml Thu Jan 17 19:25:57 2008
@@ -1,7 +1,7 @@
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: HTML-Copy
-version: 1.22
+version: 1.23
version_from: lib/HTML/Copy.pm
installdirs: site
requires:
Modified: trunk/libhtml-copy-perl/bin/htmlcopy
URL: http://svn.debian.org/wsvn/trunk/libhtml-copy-perl/bin/htmlcopy?rev=12866&op=diff
==============================================================================
--- trunk/libhtml-copy-perl/bin/htmlcopy (original)
+++ trunk/libhtml-copy-perl/bin/htmlcopy Thu Jan 17 19:25:57 2008
@@ -7,7 +7,7 @@
use Getopt::Long;
use Pod::Usage;
-our $VERSION = '1.22';
+our $VERSION = '1.23';
{
my $man = 0;
Modified: trunk/libhtml-copy-perl/debian/changelog
URL: http://svn.debian.org/wsvn/trunk/libhtml-copy-perl/debian/changelog?rev=12866&op=diff
==============================================================================
--- trunk/libhtml-copy-perl/debian/changelog (original)
+++ trunk/libhtml-copy-perl/debian/changelog Thu Jan 17 19:25:57 2008
@@ -1,3 +1,9 @@
+libhtml-copy-perl (1.23-1) unstable; urgency=low
+
+ * New upstream release
+
+ -- Gunnar Wolf <gwolf at debian.org> Thu, 17 Jan 2008 13:21:30 -0600
+
libhtml-copy-perl (1.22-1) unstable; urgency=low
* Initial Release (packaged by Alejandro Garrido Mota) (Closes: #427247).
Modified: trunk/libhtml-copy-perl/lib/HTML/Copy.pm
URL: http://svn.debian.org/wsvn/trunk/libhtml-copy-perl/lib/HTML/Copy.pm?rev=12866&op=diff
==============================================================================
--- trunk/libhtml-copy-perl/lib/HTML/Copy.pm (original)
+++ trunk/libhtml-copy-perl/lib/HTML/Copy.pm Thu Jan 17 19:25:57 2008
@@ -12,7 +12,7 @@
use Encode;
use Encode::Guess;
use Carp;
-use Data::Dumper;
+#use Data::Dumper;
use HTML::Parser 3.40;
use HTML::HeadParser;
@@ -35,11 +35,11 @@
=head1 VERSION
-Version 1.22
-
-=cut
-
-our $VERSION = '1.22';
+Version 1.23
+
+=cut
+
+our $VERSION = '1.23';
=head1 SYMPOSIS
@@ -305,7 +305,8 @@
sub check_encoding {
my ($self) = @_;
my $data;
- open my $in, "<", $self->source_path;
+ open my $in, "<", $self->source_path
+ or die "Can't open $self->source_path.";
{local $/; $data = <$in>;}
close $in;
More information about the Pkg-perl-cvs-commits
mailing list