r1809 - in packages/libparse-syslog-perl/trunk: . debian lib/Parse t
Joachim Breitner
nomeata at costa.debian.org
Fri Dec 30 16:02:58 UTC 2005
Author: nomeata
Date: 2005-12-30 16:02:57 +0000 (Fri, 30 Dec 2005)
New Revision: 1809
Modified:
packages/libparse-syslog-perl/trunk/Changes
packages/libparse-syslog-perl/trunk/META.yml
packages/libparse-syslog-perl/trunk/debian/changelog
packages/libparse-syslog-perl/trunk/lib/Parse/Syslog.pm
packages/libparse-syslog-perl/trunk/t/dst.t
Log:
upstream release, still not fixing the bug, /me is in contact with upstream
Modified: packages/libparse-syslog-perl/trunk/Changes
===================================================================
--- packages/libparse-syslog-perl/trunk/Changes 2005-12-30 15:50:49 UTC (rev 1808)
+++ packages/libparse-syslog-perl/trunk/Changes 2005-12-30 16:02:57 UTC (rev 1809)
@@ -1,13 +1,21 @@
Revision history for Perl extension Parse::Syslog.
+2005-12-29
+
+ * released 1.06
+ * fix dst.t test to work when the system timezone is not CET
+ * small documentation fixes
+
2005-12-26
+ * released 1.05
* allow passing of a IO::Handle object to new
* ignore FreeBSD's [LOG_XXX] string (Artur Penttinen)
* fix timewarp during DST switch (reported by Anthony DeRobertis)
2005-09-12
+ * internal release 1.04
* allow : in hostname for IPv6 (Artur Penttinen)
* allow @ in hostname for syslog-ng (Mark Loeser)
@@ -19,7 +27,6 @@
2004-01-19
- * released 1.03
* do not allow future dates (if allow_future is not true)
2002-10-28
Modified: packages/libparse-syslog-perl/trunk/META.yml
===================================================================
--- packages/libparse-syslog-perl/trunk/META.yml 2005-12-30 15:50:49 UTC (rev 1808)
+++ packages/libparse-syslog-perl/trunk/META.yml 2005-12-30 16:02:57 UTC (rev 1809)
@@ -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: Parse-Syslog
-version: 1.05
+version: 1.06
version_from: lib/Parse/Syslog.pm
installdirs: site
requires:
Modified: packages/libparse-syslog-perl/trunk/debian/changelog
===================================================================
--- packages/libparse-syslog-perl/trunk/debian/changelog 2005-12-30 15:50:49 UTC (rev 1808)
+++ packages/libparse-syslog-perl/trunk/debian/changelog 2005-12-30 16:02:57 UTC (rev 1809)
@@ -1,8 +1,8 @@
-libparse-syslog-perl (1.05-1) unstable; urgency=low
+libparse-syslog-perl (1.06-1) UNRELEASED; urgency=low
- * New upstream release (Closes: bug#343237)
+ * New upstream release (Closes not yet: bug#343237)
- -- Joachim Breitner <nomeata at debian.org> Thu, 29 Dec 2005 22:54:43 +0100
+ -- Joachim Breitner <nomeata at debian.org> Fri, 30 Dec 2005 16:50:59 +0100
libparse-syslog-perl (1.03-1) unstable; urgency=low
Modified: packages/libparse-syslog-perl/trunk/lib/Parse/Syslog.pm
===================================================================
--- packages/libparse-syslog-perl/trunk/lib/Parse/Syslog.pm 2005-12-30 15:50:49 UTC (rev 1808)
+++ packages/libparse-syslog-perl/trunk/lib/Parse/Syslog.pm 2005-12-30 16:02:57 UTC (rev 1809)
@@ -7,7 +7,7 @@
use strict;
use vars qw($VERSION);
-$VERSION = '1.05';
+$VERSION = '1.06';
my %months_map = (
'Jan' => 0, 'Feb' => 1, 'Mar' => 2,
@@ -411,12 +411,12 @@
=item *
-a File::Tail object as first argument, in which
-case the I<read> method will be called to get lines to process.
+an IO::Handle object.
=item *
-a file handle (GLOB-ref) for an already-opened syslog-file.
+a File::Tail object as first argument, in which
+case the I<read> method will be called to get lines to process.
=back
Modified: packages/libparse-syslog-perl/trunk/t/dst.t
===================================================================
--- packages/libparse-syslog-perl/trunk/t/dst.t 2005-12-30 15:50:49 UTC (rev 1808)
+++ packages/libparse-syslog-perl/trunk/t/dst.t 2005-12-30 16:02:57 UTC (rev 1809)
@@ -2,6 +2,7 @@
use Parse::Syslog;
use IO::Scalar;
use Test;
+use POSIX;
BEGIN {
# only test if IO::Scalar is available
@@ -10,7 +11,7 @@
warn "IO::Scalar not available: test skipped.\n";
exit;
};
-
+
plan tests => 16
};
@@ -18,6 +19,9 @@
# ---|------|------|------|-----
#
+$ENV{TZ} = 'CET-1CEST-2,M3.5.0/02:00:00,M10.5.0/03:00:00';
+POSIX::tzset();
+
my $data = <<END;
Oct 30 00:59:53 ivr3 bla: bla
Oct 30 01:09:53 ivr3 bla: bla
More information about the Pkg-perl-cvs-commits
mailing list