r45652 - in /trunk/librrdtool-oo-perl: Changes META.yml README debian/changelog debian/control debian/copyright lib/RRDTool/OO.pm t/001Basic.t t/005Graph.t t/008Mult.t t/010ABD.t

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Mon Oct 12 17:36:30 UTC 2009


Author: jawnsy-guest
Date: Mon Oct 12 17:36:25 2009
New Revision: 45652

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=45652
Log:
* New upstream release
* Added myself to Uploaders and Copyright

Modified:
    trunk/librrdtool-oo-perl/Changes
    trunk/librrdtool-oo-perl/META.yml
    trunk/librrdtool-oo-perl/README
    trunk/librrdtool-oo-perl/debian/changelog
    trunk/librrdtool-oo-perl/debian/control
    trunk/librrdtool-oo-perl/debian/copyright
    trunk/librrdtool-oo-perl/lib/RRDTool/OO.pm
    trunk/librrdtool-oo-perl/t/001Basic.t
    trunk/librrdtool-oo-perl/t/005Graph.t
    trunk/librrdtool-oo-perl/t/008Mult.t
    trunk/librrdtool-oo-perl/t/010ABD.t

Modified: trunk/librrdtool-oo-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/Changes?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/Changes (original)
+++ trunk/librrdtool-oo-perl/Changes Mon Oct 12 17:36:25 2009
@@ -1,3 +1,8 @@
+0.27 (10/11/2009)
+    (ms) Slaven Rezic reported huge memory consumption by the test suite,
+         turned out to be fetch_start() call spanning several years. 
+         Fixed by defining the end time as well as the start time.
+
 0.26 (09/27/2009)
     (ms) [RT 32601] Using prompt() instead of manually asking for input 
          in Makefile.PL (by Fabien Wernli)

Modified: trunk/librrdtool-oo-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/META.yml?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/META.yml (original)
+++ trunk/librrdtool-oo-perl/META.yml Mon Oct 12 17:36:25 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               RRDTool-OO
-version:            0.26
+version:            0.27
 abstract:           Object-oriented interface to RRDTool
 author:
     - Mike Schilli <m at perlmeister.com>

Modified: trunk/librrdtool-oo-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/README?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/README (original)
+++ trunk/librrdtool-oo-perl/README Mon Oct 12 17:36:25 2009
@@ -1,5 +1,5 @@
 ######################################################################
-    RRDTool::OO 0.26
+    RRDTool::OO 0.27
 ######################################################################
 
 NAME

Modified: trunk/librrdtool-oo-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/debian/changelog?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/debian/changelog (original)
+++ trunk/librrdtool-oo-perl/debian/changelog Mon Oct 12 17:36:25 2009
@@ -1,3 +1,10 @@
+librrdtool-oo-perl (0.27-1) UNRELEASED; urgency=low
+
+  * New upstream release
+  * Added myself to Uploaders and Copyright
+
+ -- Jonathan Yu <jawnsy at cpan.org>  Mon, 12 Oct 2009 09:45:51 -0400
+
 librrdtool-oo-perl (0.26-1) unstable; urgency=low
 
   * Initial Release. (Closes: #548450)

Modified: trunk/librrdtool-oo-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/debian/control?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/debian/control (original)
+++ trunk/librrdtool-oo-perl/debian/control Mon Oct 12 17:36:25 2009
@@ -4,7 +4,7 @@
 Build-Depends: debhelper (>= 7.0.8), quilt (>= 0.46-7)
 Build-Depends-Indep: perl, librrds-perl, liblog-log4perl-perl
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: Fabien Wernli <debian at faxm0dem.org>
+Uploaders: Fabien Wernli <debian at faxm0dem.org>, Jonathan Yu <jawnsy at cpan.org>
 Standards-Version: 3.8.3
 Homepage: http://search.cpan.org/dist/RRDTool-OO/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/librrdtool-oo-perl/
@@ -13,16 +13,14 @@
 Package: librrdtool-oo-perl
 Architecture: all
 Depends: ${perl:Depends}, ${misc:Depends}, librrds-perl,
-  liblog-log4perl-perl
+ liblog-log4perl-perl
 Description: object-oriented interface to RRDTool
- RRDTool::OO is an object-oriented interface to Tobi Oetiker's round
- robin database tool rrdtool. It uses rrdtool's RRDs module to get
- access to rrdtool's shared library.
- RRDTool::OO tries to marry rrdtool's database engine with the
- dwimminess and whipuptitude Perl programmers take for granted. Using
- RRDTool::OO abstracts away implementation details of the RRD engine,
- uses easy to memorize named parameters and sets meaningful defaults for
- parameters not needed in simple cases. For the experienced user,
- however, it provides full access to rrdtool's API (you are welcome to
- make a feature request on CPAN RT).
-
+ RRDTool::OO is an object-oriented Perl interface to Tobi Oetiker's round robin
+ database tool, also known as rrdtool. It uses rrdtool's RRDs module to access
+ rrdtool's shared library. It tries to marry rrdtool's database engine with the
+ Perl programming language.
+ .
+ Using this module hides implementation details of the RRD engine, uses easy-
+ to-memorize named parameters and sets meaningful defaults for parameters not
+ needed in simple cases. For the experienced user, however, it still provides
+ full access to rrdtool's API.

Modified: trunk/librrdtool-oo-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/debian/copyright?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/debian/copyright (original)
+++ trunk/librrdtool-oo-perl/debian/copyright Mon Oct 12 17:36:25 2009
@@ -10,6 +10,7 @@
 
 Files: debian/*
 Copyright: 2009, Fabien Wernli <debian at faxm0dem.org>
+ 2009, Jonathan Yu <jawnsy at cpan.org>
 License: Artistic | GPL-1+
 
 License: Artistic

Modified: trunk/librrdtool-oo-perl/lib/RRDTool/OO.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/lib/RRDTool/OO.pm?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/lib/RRDTool/OO.pm (original)
+++ trunk/librrdtool-oo-perl/lib/RRDTool/OO.pm Mon Oct 12 17:36:25 2009
@@ -7,7 +7,7 @@
 use RRDs;
 use Log::Log4perl qw(:easy);
 
-our $VERSION = '0.26';
+our $VERSION = '0.27';
 
    # Define the mandatory and optional parameters for every method.
 our $OPTIONS = {

Modified: trunk/librrdtool-oo-perl/t/001Basic.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/t/001Basic.t?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/t/001Basic.t (original)
+++ trunk/librrdtool-oo-perl/t/001Basic.t Mon Oct 12 17:36:25 2009
@@ -97,7 +97,8 @@
 my @expected = qw(1080462360:5.6 1080462420:5.7 1080462480:5.8
                   1080462540:5.9 1080462600:6);
 
-$rrd->fetch_start(start => $end_time - 5*60, cfunc => 'MAX');
+$rrd->fetch_start(start => $end_time - 5*60, end => $end_time,
+                  cfunc => 'MAX');
 $rrd->fetch_skip_undef();
 my $count = 0;
 while(my($time, $val) = $rrd->fetch_next()) {
@@ -110,7 +111,8 @@
     # long-term archive
 @expected = qw(1080461100:3.5 1080461400:4 1080461700:4.5 1080462000:5 1080462300:5.5 1080462600:6);
 
-$rrd->fetch_start(start => $end_time - 30*60, cfunc => 'MAX');
+$rrd->fetch_start(start => $end_time - 30*60, end => $end_time,
+                  cfunc => 'MAX');
 $rrd->fetch_skip_undef();
 $count = 0;
 while(my($time, $val) = $rrd->fetch_next()) {

Modified: trunk/librrdtool-oo-perl/t/005Graph.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/t/005Graph.t?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/t/005Graph.t (original)
+++ trunk/librrdtool-oo-perl/t/005Graph.t Mon Oct 12 17:36:25 2009
@@ -87,7 +87,8 @@
     });
 }
 
-$rrd->fetch_start(start => $start_time, cfunc => 'MAX');
+$rrd->fetch_start(start => $start_time, end => $end_time,
+                  cfunc => 'MAX');
 $rrd->fetch_skip_undef();
 while(my($time, $val1, $val2) = $rrd->fetch_next()) {
     last unless defined $val1;
@@ -132,7 +133,8 @@
     });
 }
 
-$rrd2->fetch_start(start => $start_time, cfunc => 'AVERAGE');
+$rrd2->fetch_start(start => $start_time, end => $end_time,
+                   cfunc => 'AVERAGE');
 $rrd2->fetch_skip_undef();
 while(my($time, $val1) = $rrd2->fetch_next()) {
     last unless defined $val1;

Modified: trunk/librrdtool-oo-perl/t/008Mult.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/t/008Mult.t?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/t/008Mult.t (original)
+++ trunk/librrdtool-oo-perl/t/008Mult.t Mon Oct 12 17:36:25 2009
@@ -61,7 +61,8 @@
 my @expected_val2 = qw(1080462360:15.6 1080462420:15.7 1080462480:15.8
                        1080462540:15.9 1080462600:16);
 
-$rrd->fetch_start(start => $end_time - 5*60, cfunc => 'MAX');
+$rrd->fetch_start(start => $end_time - 5*60, end => $end_time,
+                  cfunc => 'MAX');
 $rrd->fetch_skip_undef();
 my $count = 0;
 while(my($time, $val1, $val2) = $rrd->fetch_next()) {

Modified: trunk/librrdtool-oo-perl/t/010ABD.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/librrdtool-oo-perl/t/010ABD.t?rev=45652&op=diff
==============================================================================
--- trunk/librrdtool-oo-perl/t/010ABD.t (original)
+++ trunk/librrdtool-oo-perl/t/010ABD.t Mon Oct 12 17:36:25 2009
@@ -111,7 +111,8 @@
 ###########################################
     my($rrd, $start_time) = @_;
 
-    $rrd->fetch_start(start => $start_time, cfunc => "FAILURES");
+    $rrd->fetch_start(start => $start_time, end => $end_time + 3600,
+                      cfunc => "FAILURES");
     $rrd->fetch_skip_undef();
     my $count = 0;
     while(my($time, $val) = $rrd->fetch_next()) {




More information about the Pkg-perl-cvs-commits mailing list