diff options
Diffstat (limited to 'usr.sbin/pkg_add/OpenBSD/PackageRepository/HTTP.pm')
| -rwxr-xr-x | usr.sbin/pkg_add/OpenBSD/PackageRepository/HTTP.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PackageRepository/HTTP.pm b/usr.sbin/pkg_add/OpenBSD/PackageRepository/HTTP.pm index 2e2727f3c95..ea4fea212cc 100755 --- a/usr.sbin/pkg_add/OpenBSD/PackageRepository/HTTP.pm +++ b/usr.sbin/pkg_add/OpenBSD/PackageRepository/HTTP.pm @@ -1,6 +1,6 @@ #! /usr/bin/perl # ex:ts=8 sw=4: -# $OpenBSD: HTTP.pm,v 1.12 2014/08/27 18:40:03 kspillner Exp $ +# $OpenBSD: HTTP.pm,v 1.13 2017/08/04 11:53:03 sthen Exp $ # # Copyright (c) 2011 Marc Espie <espie@openbsd.org> # @@ -280,7 +280,7 @@ sub get_directory exit 1; } print "SUCCESS: directory $dname\n"; - for my $pkg ($r =~ m/\<A\s+HREF=\"(.+?)\.tgz\"\>/gio) { + for my $pkg ($r =~ m/\<A[^>]*\s+HREF=\"(.+?)\.tgz\"/gio) { $pkg = $1 if $pkg =~ m|^.*/(.*)$|; # decode uri-encoding; from URI::Escape $pkg =~ s/%([0-9A-Fa-f]{2})/chr(hex($1))/eg; |