diff --git a/HTTP-Tiny-0.070-Croak-on-failed-write-into-a-file.patch b/HTTP-Tiny-0.070-Croak-on-failed-write-into-a-file.patch deleted file mode 100644 index 510d701747cbda250c07e77b97964f52c8ec581e..0000000000000000000000000000000000000000 --- a/HTTP-Tiny-0.070-Croak-on-failed-write-into-a-file.patch +++ /dev/null @@ -1,36 +0,0 @@ -From ddda87fb08ca523115be1ffd6dec8442e47bc20b Mon Sep 17 00:00:00 2001 -From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= -Date: Wed, 27 Nov 2013 10:45:39 +0100 -Subject: [PATCH] Croak on failed write into a file -MIME-Version: 1.0 -Content-Type: text/plain; charset=UTF-8 -Content-Transfer-Encoding: 8bit - -The mirror() method saves a document into a file. Any error while -writing to the file, e.g. no disk space, was ignored. This patch fixes -it by croaking on such I/O error. - -Signed-off-by: Petr Písař ---- - lib/HTTP/Tiny.pm | 5 ++++- - 1 file changed, 4 insertions(+), 1 deletion(-) - -diff --git a/lib/HTTP/Tiny.pm b/lib/HTTP/Tiny.pm -index 541befe..b3fffd0 100644 ---- a/lib/HTTP/Tiny.pm -+++ b/lib/HTTP/Tiny.pm -@@ -300,7 +300,10 @@ sub mirror { - sysopen my $fh, $tempfile, Fcntl::O_CREAT()|Fcntl::O_EXCL()|Fcntl::O_WRONLY() - or _croak(qq/Error: Could not create temporary file $tempfile for downloading: $!\n/); - binmode $fh; -- $args->{data_callback} = sub { print {$fh} $_[0] }; -+ $args->{data_callback} = sub { -+ print {$fh} $_[0] -+ or _croak(qq/Error: Could not write into temporary file $tempfile: $!\n/); -+ }; - my $response = $self->request('GET', $url, $args); - close $fh - or _croak(qq/Error: Caught error closing temporary file $tempfile: $!\n/); --- -2.7.4 - diff --git a/perl-HTTP-Tiny.spec b/perl-HTTP-Tiny.spec index 7380283b508c03611ebc7c09e144678907ba83ec..95c67dcc29ced073c4f8ef391dcd84306f4d824d 100644 --- a/perl-HTTP-Tiny.spec +++ b/perl-HTTP-Tiny.spec @@ -1,14 +1,11 @@ Name: perl-HTTP-Tiny Version: 0.076 -Release: 2 +Release: 3 Summary: A small, simple, correct HTTP/1.1 client License: GPL+ or Artistic URL: https://metacpan.org/release/HTTP-Tiny Source0: https://cpan.metacpan.org/authors/id/D/DA/DAGOLDEN/HTTP-Tiny-%{version}.tar.gz -# https://github.com/chansen/p5-http-tiny/issues/32 -Patch0: HTTP-Tiny-0.070-Croak-on-failed-write-into-a-file.patch - BuildArch: noarch BuildRequires: make perl-generators perl-interpreter @@ -67,5 +64,8 @@ make test %{_mandir}/man3/* %changelog +* Sat Jan 4 2020 openEuler Buildteam - 0.076-3 +- Delete redundant files + * Tue Sep 17 2019 openEuler Buildteam - 0.076-2 -- Package init \ No newline at end of file +- Package init