r63721 - in /branches/upstream/libstatistics-descriptive-perl/current: Changes MANIFEST META.yml lib/Statistics/Descriptive.pm tag-release.pl

[carnil at users.alioth.debian.org]

Author: carnil
Date: Fri Oct 15 05:25:31 2010
New Revision: 63721

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=63721
Log:
[svn-upgrade] new version libstatistics-descriptive-perl (3.0201)

Added:
    branches/upstream/libstatistics-descriptive-perl/current/tag-release.pl
Modified:
    branches/upstream/libstatistics-descriptive-perl/current/Changes
    branches/upstream/libstatistics-descriptive-perl/current/MANIFEST
    branches/upstream/libstatistics-descriptive-perl/current/META.yml
    branches/upstream/libstatistics-descriptive-perl/current/lib/Statistics/Descriptive.pm

Modified: branches/upstream/libstatistics-descriptive-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libstatistics-descriptive-perl/current/Changes?rev=63721&op=diff
==============================================================================
--- branches/upstream/libstatistics-descriptive-perl/current/Changes (original)
+++ branches/upstream/libstatistics-descriptive-perl/current/Changes Fri Oct 15 05:25:31 2010
@@ -1,9 +1,17 @@
 Revision history for Perl extension Statistics::Descriptive.
+
+3.0201      October 14, 2010
+    - Add some documentation clarifying the 0th percentile return, as it
+    returns undef() for representing -inf:
+        - Fix https://rt.cpan.org/Ticket/Display.html?id=62055
+        - Thanks to Dave Breimann for reporting it.
+    - Add the tag-release.pl to tag a release using Subversion.
 
 3.0200      June 18, 2010
     - Added skewness and kurtosis
         - https://rt.cpan.org/Ticket/Display.html?id=58187
         - Thanks to Shawn Laffan.
+    - Removed the Changes / Revision log from the .pm file. 
 
 3.0102      June 15, 2010
     - Add the $VERSION variable to Statistics::Descriptive::Sparse and

Modified: branches/upstream/libstatistics-descriptive-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libstatistics-descriptive-perl/current/MANIFEST?rev=63721&op=diff
==============================================================================
--- branches/upstream/libstatistics-descriptive-perl/current/MANIFEST (original)
+++ branches/upstream/libstatistics-descriptive-perl/current/MANIFEST Fri Oct 15 05:25:31 2010
@@ -9,6 +9,7 @@
 README
 rejects/descr.t
 t/00-load.t
+tag-release.pl
 t/descr.t
 t/freq_distribution-1-rt-34999.t
 t/pod-coverage.t

Modified: branches/upstream/libstatistics-descriptive-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libstatistics-descriptive-perl/current/META.yml?rev=63721&op=diff
==============================================================================
--- branches/upstream/libstatistics-descriptive-perl/current/META.yml (original)
+++ branches/upstream/libstatistics-descriptive-perl/current/META.yml Fri Oct 15 05:25:31 2010
@@ -26,13 +26,13 @@
 provides:
   Statistics::Descriptive:
     file: lib/Statistics/Descriptive.pm
-    version: 3.0200
+    version: 3.0201
   Statistics::Descriptive::Full:
     file: lib/Statistics/Descriptive.pm
-    version: 3.0200
+    version: 3.0201
   Statistics::Descriptive::Sparse:
     file: lib/Statistics/Descriptive.pm
-    version: 3.0200
+    version: 3.0201
 requires:
   Carp: 0
   POSIX: 0
@@ -43,4 +43,4 @@
   homepage: http://web-cpan.berlios.de/modules/Statistics-Descriptive/
   license: http://dev.perl.org/licenses/
   repository: http://svn.berlios.de/svnroot/repos/web-cpan/Statistics-Descriptive/
-version: 3.0200
+version: 3.0201

Modified: branches/upstream/libstatistics-descriptive-perl/current/lib/Statistics/Descriptive.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libstatistics-descriptive-perl/current/lib/Statistics/Descriptive.pm?rev=63721&op=diff
==============================================================================
--- branches/upstream/libstatistics-descriptive-perl/current/lib/Statistics/Descriptive.pm (original)
+++ branches/upstream/libstatistics-descriptive-perl/current/lib/Statistics/Descriptive.pm Fri Oct 15 05:25:31 2010
@@ -10,7 +10,7 @@
 		  ##Perl5.  01-03 weren't bug free.
 use vars (qw($VERSION $Tolerance));
 
-$VERSION = '3.0200';
+$VERSION = '3.0201';
 
 $Tolerance = 0.0;
 
@@ -18,7 +18,7 @@
 
 use vars qw($VERSION);
 
-$VERSION = '3.0200';
+$VERSION = '3.0201';
 
 use vars qw(%fields);
 use Carp;
@@ -234,7 +234,7 @@
 
 use vars qw($VERSION);
 
-$VERSION = '3.0200';
+$VERSION = '3.0201';
 
 use Carp;
 
@@ -1016,7 +1016,8 @@
 example above is 4, since F(4) = 3/6 = 50%; the 25th percentile is
 -2, since F(-5) = 1/6 < 25%, and F(-2) = 2/6 >= 25%; the 100th
 percentile is 18; and the 0th percentile is -infinity, as is the 15th
-percentile.
+percentile, which for ease of handling and backward compatibility is returned
+as undef() by the function.
 
 Care must be taken when using percentiles to summarize a sample,
 because they can lend an unwarranted appearance of more precision

Added: branches/upstream/libstatistics-descriptive-perl/current/tag-release.pl
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libstatistics-descriptive-perl/current/tag-release.pl?rev=63721&op=file
==============================================================================
--- branches/upstream/libstatistics-descriptive-perl/current/tag-release.pl (added)
+++ branches/upstream/libstatistics-descriptive-perl/current/tag-release.pl Fri Oct 15 05:25:31 2010
@@ -1,0 +1,30 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use IO::All;
+
+my ($version) = 
+    (map { m{\$VERSION *= *'([^']+)'} ? ($1) : () } 
+    io->file('lib/Statistics/Descriptive.pm')->getlines()
+    )
+    ;
+
+if (!defined ($version))
+{
+    die "Version is undefined!";
+}
+
+my $mini_repos_base = 'https://svn.berlios.de/svnroot/repos/web-cpan/Statistics-Descriptive';
+
+my @cmd = (
+    "svn", "copy", "-m",
+    "Tagging the Statistics-Descriptive release as $version",
+    "$mini_repos_base/trunk",
+    "$mini_repos_base/tags/releases/$version",
+);
+
+print join(" ", @cmd), "\n";
+exec(@cmd);
+