Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
openSUSE:Leap:42.3:Update
perl-XML-Entities
perl-XML-Entities-local_files.patch
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File perl-XML-Entities-local_files.patch of Package perl-XML-Entities
--- bin/download-entities.pl.orig 2009-11-06 16:17:54.000000000 +0100 +++ bin/download-entities.pl 2009-11-06 16:21:14.000000000 +0100 @@ -86,6 +86,15 @@ sub download { my ($url, $options) = @_; + my $filename = $url; + $filename =~ s|^.*/||; + print "filename=\"$filename\"\n"; + open(my $filehandle, '<', $filename) or die "failed to open \"$filename\": $!"; + my $filecontent = ""; + while (<$filehandle>) { $filecontent .= $_; } + close($filehandle); + return $filecontent; + if ($OPTIONS{interactive}) { print STDERR "About to download '$url'\n"; my $ignore_ok = ', enter whitespace to skip download';
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor
