forked from hummypkg/webif
Work around uclibc getaddrinfo()
This commit is contained in:
parent
67afb37f27
commit
f206766191
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user