Hello community,
here is the log from the commit of package perl-Text-TabularDisplay for
openSUSE:Factory checked in at 2014-07-26 09:42:04
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Text-TabularDisplay (Old)
and /work/SRC/openSUSE:Factory/.perl-Text-TabularDisplay.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Text-TabularDisplay"
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Text-TabularDisplay/perl-Text-TabularDisplay.changes
2013-07-30 14:04:29.000000000 +0200
+++
/work/SRC/openSUSE:Factory/.perl-Text-TabularDisplay.new/perl-Text-TabularDisplay.changes
2014-07-26 09:42:15.000000000 +0200
@@ -1,0 +2,5 @@
+Fri Jul 25 09:32:03 UTC 2014 - [email protected]
+
+- updated to 1.38, no changelog
+
+-------------------------------------------------------------------
Old:
----
Text-TabularDisplay-1.35.tar.gz
New:
----
Text-TabularDisplay-1.38.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Text-TabularDisplay.spec ++++++
--- /var/tmp/diff_new_pack.B2zTvR/_old 2014-07-26 09:42:16.000000000 +0200
+++ /var/tmp/diff_new_pack.B2zTvR/_new 2014-07-26 09:42:16.000000000 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-Text-TabularDisplay
#
-# Copyright (c) 2013 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -16,23 +16,20 @@
#
-# MANUAL LICENSE
Name: perl-Text-TabularDisplay
-Version: 1.35
+Version: 1.38
Release: 0
%define cpan_name Text-TabularDisplay
Summary: Display text in formatted table output
License: GPL-2.0
Group: Development/Libraries/Perl
+# MANUAL License
Url: http://search.cpan.org/dist/Text-TabularDisplay/
Source:
http://www.cpan.org/authors/id/D/DA/DARREN/%{cpan_name}-%{version}.tar.gz
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
BuildRequires: perl-macros
-#BuildRequires: perl(DBI)
-#BuildRequires: perl(MySQL::Config)
-#BuildRequires: perl(Text::TabularDisplay)
%{perl_requires}
%description
++++++ Text-TabularDisplay-1.35.tar.gz -> Text-TabularDisplay-1.38.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Text-TabularDisplay-1.35/META.yml
new/Text-TabularDisplay-1.38/META.yml
--- old/Text-TabularDisplay-1.35/META.yml 2013-06-11 17:22:38.000000000
+0200
+++ new/Text-TabularDisplay-1.38/META.yml 2014-07-07 16:01:37.000000000
+0200
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Text-TabularDisplay
-version: 1.35
+version: 1.38
abstract: Display text in formatted table output
author:
- darren chamberlain <[email protected]>
@@ -10,8 +10,7 @@
ExtUtils::MakeMaker: 0
build_requires:
ExtUtils::MakeMaker: 0
-requires:
- IO::File: ~
+requires: {}
no_index:
directory:
- t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Text-TabularDisplay-1.35/Makefile.PL
new/Text-TabularDisplay-1.38/Makefile.PL
--- old/Text-TabularDisplay-1.35/Makefile.PL 2013-06-11 17:20:20.000000000
+0200
+++ new/Text-TabularDisplay-1.38/Makefile.PL 2014-07-03 18:04:53.000000000
+0200
@@ -5,7 +5,7 @@
use ExtUtils::MakeMaker;
-%PREREQ_PM = ('IO::File');
+%PREREQ_PM = ();
%clean = ('FILES' => '$(DISTVNAME).tar$(SUFFIX)');
WriteMakefile(
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Text-TabularDisplay-1.35/README
new/Text-TabularDisplay-1.38/README
--- old/Text-TabularDisplay-1.35/README 2013-06-11 17:21:25.000000000 +0200
+++ new/Text-TabularDisplay-1.38/README 2014-07-04 14:21:48.000000000 +0200
@@ -233,7 +233,8 @@
Slaven Rezic
Harlan Lieberman-Berg
Patrick Kuijvenhoven
+ Miko O'Sullivan
VERSION
- This documentation describes "Text::TabularDisplay" version 1.35.
+ This documentation describes "Text::TabularDisplay" version 1.37.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Text-TabularDisplay-1.35/TabularDisplay.pm
new/Text-TabularDisplay-1.38/TabularDisplay.pm
--- old/Text-TabularDisplay-1.35/TabularDisplay.pm 2013-06-11
17:20:43.000000000 +0200
+++ new/Text-TabularDisplay-1.38/TabularDisplay.pm 2014-07-07
15:59:25.000000000 +0200
@@ -2,7 +2,7 @@
# -------------------------------------------------------------------
# Text::TabularDisplay - Display text in formatted table output
-# Copyright (C) 2004-2012 darren chamberlain <[email protected]>
+# Copyright (C) 2004-2014 darren chamberlain <[email protected]>
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License as
@@ -15,15 +15,15 @@
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-# 02111-1307 USA
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+# 02110-1301 USA
# -------------------------------------------------------------------
use strict;
use integer;
use vars qw($VERSION);
-$VERSION = "1.35";
+$VERSION = "1.38";
# ---======================= Public Methods ======================---
@@ -284,6 +284,11 @@
if $len < length;
}
+ # untaint $len
+ unless ($len =~ m|^(\d+)$|s)
+ { die 'invalid length: ' . $len }
+ $len = $1;
+
return $len;
}
@@ -553,8 +558,9 @@
Slaven Rezic
Harlan Lieberman-Berg
Patrick Kuijvenhoven
+ Miko O'Sullivan
=head1 VERSION
-This documentation describes C<Text::TabularDisplay> version 1.35.
+This documentation describes C<Text::TabularDisplay> version 1.38.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Text-TabularDisplay-1.35/examples/dump-passwd.pl
new/Text-TabularDisplay-1.38/examples/dump-passwd.pl
--- old/Text-TabularDisplay-1.35/examples/dump-passwd.pl 2013-02-24
13:14:39.000000000 +0100
+++ new/Text-TabularDisplay-1.38/examples/dump-passwd.pl 2014-07-04
14:35:21.000000000 +0200
@@ -9,8 +9,10 @@
open PASSWD, "/etc/passwd"
or die "Can't open /etc/passwd: $!";
-$t->add((split /:/, $_)[2, 0, 4])
- for <PASSWD>;
+for (<PASSWD>) {
+ $t->add((split /:/, $_)[2, 0, 4])
+ unless /^#/;
+}
close PASSWD
or die "Can't close /etc/passwd: $!";
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
