r1807 - in packages/libparse-syslog-perl/branches/upstream/current: . lib/Parse t

Joachim Breitner nomeata at costa.debian.org
Fri Dec 30 15:50:43 UTC 2005


Author: nomeata
Date: 2005-12-30 15:50:42 +0000 (Fri, 30 Dec 2005)
New Revision: 1807

Modified:
   packages/libparse-syslog-perl/branches/upstream/current/Changes
   packages/libparse-syslog-perl/branches/upstream/current/META.yml
   packages/libparse-syslog-perl/branches/upstream/current/lib/Parse/Syslog.pm
   packages/libparse-syslog-perl/branches/upstream/current/t/dst.t
Log:
Load /tmp/tmp.e1x0j7/libparse-syslog-perl-1.06 into
packages/libparse-syslog-perl/branches/upstream/current.


Modified: packages/libparse-syslog-perl/branches/upstream/current/Changes
===================================================================
--- packages/libparse-syslog-perl/branches/upstream/current/Changes	2005-12-30 11:25:34 UTC (rev 1806)
+++ packages/libparse-syslog-perl/branches/upstream/current/Changes	2005-12-30 15:50:42 UTC (rev 1807)
@@ -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/branches/upstream/current/META.yml
===================================================================
--- packages/libparse-syslog-perl/branches/upstream/current/META.yml	2005-12-30 11:25:34 UTC (rev 1806)
+++ packages/libparse-syslog-perl/branches/upstream/current/META.yml	2005-12-30 15:50:42 UTC (rev 1807)
@@ -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/branches/upstream/current/lib/Parse/Syslog.pm
===================================================================
--- packages/libparse-syslog-perl/branches/upstream/current/lib/Parse/Syslog.pm	2005-12-30 11:25:34 UTC (rev 1806)
+++ packages/libparse-syslog-perl/branches/upstream/current/lib/Parse/Syslog.pm	2005-12-30 15:50:42 UTC (rev 1807)
@@ -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/branches/upstream/current/t/dst.t
===================================================================
--- packages/libparse-syslog-perl/branches/upstream/current/t/dst.t	2005-12-30 11:25:34 UTC (rev 1806)
+++ packages/libparse-syslog-perl/branches/upstream/current/t/dst.t	2005-12-30 15:50:42 UTC (rev 1807)
@@ -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