8
0

Accepting request 414799 from devel:languages:perl:autoupdate

- updated to 0.64
   see /usr/share/doc/packages/perl-Data-Util/Changes
  0.64 2016-07-23T15:13:01Z
      - Fix on perl 5.22.x or higher versions
      - Minilla migrate
- remove upstream perl522.patch

OBS-URL: https://build.opensuse.org/request/show/414799
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Data-Util?expand=0&rev=18
This commit is contained in:
Stephan Kulow
2016-08-01 14:59:32 +00:00
committed by Git OBS Bridge
parent ff4d988e74
commit 67784d8fd1
6 changed files with 56 additions and 57 deletions

View File

@@ -1,3 +0,0 @@
version https://git-lfs.github.com/spec/v1
oid sha256:451e06be33799510f1220f67bb30805b93654341d41658c931fc0601a6390961
size 73438

3
Data-Util-0.64.tar.gz Normal file
View File

@@ -0,0 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:2d58e72c58531717599cd1a3cf4fb0206bb61b749b5b982a95bf17e83d6fc777
size 60783

28
cpanspec.yml Normal file
View File

@@ -0,0 +1,28 @@
---
#description_paragraphs: 3
#description: |-
# override description from CPAN
#summary: override summary from CPAN
#no_testing: broken upstream
#sources:
# - source1
# - source2
#patches:
# foo.patch: -p1
# bar.patch:
#preamble: |-
# BuildRequires: gcc-c++
#post_prep: |-
# hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'`
# sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL
#post_build: |-
# rm unused.files
#post_install: |-
# sed on %{name}.files
#license: SUSE-NonFree
#skip_noarch: 1
#custom_build: |-
#./Build build flags=%{?_smp_mflags} --myflag
#custom_test: |-
#startserver && make test
#ignore_requires: Bizarre::Module

View File

@@ -1,3 +1,14 @@
-------------------------------------------------------------------
Sun Jul 24 05:13:57 UTC 2016 - coolo@suse.com
- updated to 0.64
see /usr/share/doc/packages/perl-Data-Util/Changes
0.64 2016-07-23T15:13:01Z
- Fix on perl 5.22.x or higher versions
- Minilla migrate
- remove upstream perl522.patch
-------------------------------------------------------------------
Thu Aug 27 13:51:06 UTC 2015 - hsk@imb-jena.de

View File

@@ -1,7 +1,7 @@
#
# spec file for package perl-Data-Util
#
# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany.
# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -17,23 +17,26 @@
Name: perl-Data-Util
Version: 0.63
Version: 0.64
Release: 0
%define cpan_name Data-Util
Summary: A selection of utilities for data and data types
Summary: Selection of Utilities for Data and Data Types
License: Artistic-1.0 or GPL-1.0+
Group: Development/Libraries/Perl
Url: http://search.cpan.org/dist/Data-Util/
Source: http://www.cpan.org/authors/id/G/GF/GFUJI/%{cpan_name}-%{version}.tar.gz
Patch0: perl522.patch
Source0: http://www.cpan.org/authors/id/S/SY/SYOHEX/%{cpan_name}-%{version}.tar.gz
Source1: cpanspec.yml
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
BuildRequires: perl-macros
BuildRequires: perl(Devel::PPPort) >= 3.19
BuildRequires: perl(ExtUtils::MakeMaker) >= 6.59
BuildRequires: perl(ExtUtils::ParseXS) >= 3.18
BuildRequires: perl(Hash::Util::FieldHash::Compat)
BuildRequires: perl(Module::Build) >= 0.400500
BuildRequires: perl(Module::Build::XSUtil) >= 0.02
BuildRequires: perl(Scope::Guard)
BuildRequires: perl(Test::Exception) >= 0.27
BuildRequires: perl(Test::Exception) >= 0.270000
%{perl_requires}
%description
@@ -47,23 +50,20 @@ There are many benchmarks in the _DIST-DIR/benchmark/_ directory.
%prep
%setup -q -n %{cpan_name}-%{version}
find . -type f -print0 | xargs -0 chmod 644
%patch0 -p1
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}"
%{__make} %{?_smp_mflags}
%{__perl} Build.PL installdirs=vendor optimize="%{optflags}"
./Build build flags=%{?_smp_mflags}
%check
%{__make} test
./Build test
%install
%perl_make_install
%perl_process_packlist
./Build install destdir=%{buildroot} create_packlist=0
%perl_gen_filelist
%files -f %{name}.files
%defattr(-,root,root,755)
%doc Changes example README
%doc Changes circle.yml example LICENSE minil.toml README.md
%changelog

View File

@@ -1,40 +0,0 @@
diff -rup Data-Util-0.63-eMJzy2-orig/DataUtil.xs Data-Util-0.63-eMJzy2/DataUtil.xs
--- Data-Util-0.63-eMJzy2-orig/DataUtil.xs 2013-04-03 00:06:08.000000000 -0700
+++ Data-Util-0.63-eMJzy2/DataUtil.xs 2014-09-23 18:48:48.000000000 -0700
@@ -674,7 +674,14 @@ my_uninstall_sub(pTHX_ HV* const stash,
CV* code;
if(!isGV(gv)){ /* a subroutine stub or special constant*/
- if(SvROK((SV*)gv) && ckWARN(WARN_MISC)){
+ /* or perhaps a sub ref */
+ if(SvROK((SV*)gv)) {
+ if(SvTYPE(SvRV(gv)) == SVt_PVCV) {
+ if( specified_code &&
+ specified_code != (CV*)SvRV(gv) )
+ return;
+ }
+ else if(ckWARN(WARN_MISC))
Perl_warner(aTHX_ packWARN(WARN_MISC), "Constant subroutine %s uninstalled", name);
}
(void)hv_delete(stash, name, namelen, G_DISCARD);
diff -rup Data-Util-0.63-eMJzy2-orig/lib/Data/Util/PurePerl.pm Data-Util-0.63-eMJzy2/lib/Data/Util/PurePerl.pm
--- Data-Util-0.63-eMJzy2-orig/lib/Data/Util/PurePerl.pm 2012-10-20 04:54:44.000000000 -0700
+++ Data-Util-0.63-eMJzy2/lib/Data/Util/PurePerl.pm 2014-09-23 18:44:36.000000000 -0700
@@ -246,8 +246,16 @@ sub uninstall_subroutine {
my $glob = $stash->{$name};
if(ref(\$glob) ne 'GLOB'){
- if(ref $glob){
+ if(ref $glob) {
+ if(Scalar::Util::reftype $glob eq 'CODE'){
+ if(defined $specified_code &&
+ $specified_code != $glob) {
+ next;
+ }
+ }
+ else {
warnings::warnif(misc => "Constant subroutine $name uninstalled");
+ }
}
delete $stash->{$name};
next;