forked from pool/perl-Exception-Base
- remove upstream Exception-Base-sprintf.patch
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Exception-Base?expand=0&rev=9
This commit is contained in:
committed by
Git OBS Bridge
parent
7318bf8246
commit
11a53b6201
@@ -1,29 +0,0 @@
|
|||||||
--- lib/Exception/Base.pm
|
|
||||||
+++ lib/Exception/Base.pm
|
|
||||||
@@ -1362,7 +1362,7 @@
|
|
||||||
local $_ = ref $self->{$key} eq 'ARRAY'
|
|
||||||
? sprintf(
|
|
||||||
@{$self->{$key}}[0],
|
|
||||||
- @{$self->{$key}}[1..@{$self->{$key}}]
|
|
||||||
+ @{$self->{$key}}[1..@{$self->{$key}}-1]
|
|
||||||
)
|
|
||||||
: $self->{$key};
|
|
||||||
if (ref $arrval eq 'CODE') {
|
|
||||||
@@ -1393,7 +1393,7 @@
|
|
||||||
local $_ = ref $self->{$key} eq 'ARRAY'
|
|
||||||
? sprintf(
|
|
||||||
@{$self->{$key}}[0],
|
|
||||||
- @{$self->{$key}}[1..@{$self->{$key}}]
|
|
||||||
+ @{$self->{$key}}[1..@{$self->{$key}}-1]
|
|
||||||
)
|
|
||||||
: $self->{$key};
|
|
||||||
|
|
||||||
@@ -1613,7 +1613,7 @@
|
|
||||||
my ($self) = @_;
|
|
||||||
|
|
||||||
return map { ref $_ eq 'ARRAY'
|
|
||||||
- ? sprintf(@$_[0], @$_[1..@$_])
|
|
||||||
+ ? sprintf(@$_[0], @$_[1..@$_-1])
|
|
||||||
: $_ }
|
|
||||||
grep { defined $_ and (ref $_ or $_ ne '') }
|
|
||||||
map { $self->{$_} }
|
|
@@ -3,6 +3,7 @@ Fri Nov 20 09:32:52 UTC 2015 - coolo@suse.com
|
|||||||
|
|
||||||
- updated to 0.2501
|
- updated to 0.2501
|
||||||
see /usr/share/doc/packages/perl-Exception-Base/Changes
|
see /usr/share/doc/packages/perl-Exception-Base/Changes
|
||||||
|
- remove upstream Exception-Base-sprintf.patch
|
||||||
|
|
||||||
-------------------------------------------------------------------
|
-------------------------------------------------------------------
|
||||||
Wed Sep 30 01:29:09 CEST 2015 - ro@suse.de
|
Wed Sep 30 01:29:09 CEST 2015 - ro@suse.de
|
||||||
|
Reference in New Issue
Block a user