From f20676619144915864ec78c020bd4be55cd8f9bb Mon Sep 17 00:00:00 2001 From: prpr Date: Wed, 24 Feb 2021 14:47:11 +0000 Subject: [PATCH] Work around uclibc getaddrinfo() --- webif/lib/pkg.class | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/webif/lib/pkg.class b/webif/lib/pkg.class index 0cee525..c280533 100755 --- a/webif/lib/pkg.class +++ b/webif/lib/pkg.class @@ -128,7 +128,7 @@ pkg method loadraw {} { } else { set data [exec /bin/opkg info $name] } - + foreach line [split $data "\n"] { if {$tag ne "" && [string match { *} $line]} { append raw($tag) $line @@ -225,7 +225,7 @@ proc {pkg loaddiagmeta} {} { } proc {pkg fetchfile} {url} { - set f [socket stream hpkg.tv:80] + set f [socket stream hpkg.tv:http] $f puts -nonewline "GET /hdrfoxt2/$url HTTP/1.1\r\n" $f puts -nonewline "Host: hpkg.tv\r\n" $f puts -nonewline "Connection: close\r\n" @@ -237,7 +237,7 @@ proc {pkg fetchfile} {url} { #puts "Web Header: $line" set line [string trim [$f gets]] } - + # Save the body set ret [$f read] $f close