Fix download page
This commit is contained in:
parent
6a15ad5877
commit
94f9522e2c
|
@ -25,6 +25,7 @@ if {[info exists env(QUERY_STRING)]} {
|
||||||
regexp {cmd=([^&]+)} $env(QUERY_STRING) match cmd
|
regexp {cmd=([^&]+)} $env(QUERY_STRING) match cmd
|
||||||
}
|
}
|
||||||
if {$cmd == "download"} {
|
if {$cmd == "download"} {
|
||||||
|
puts "Content-Type: text/html\n"
|
||||||
puts "<html><head><meta http-equiv=\"refresh\" content=\"0; url=${package_url}\" /></head><body><a href=\"${package_url}\">${package_url}</a></body></html>"
|
puts "<html><head><meta http-equiv=\"refresh\" content=\"0; url=${package_url}\" /></head><body><a href=\"${package_url}\">${package_url}</a></body></html>"
|
||||||
} else {
|
} else {
|
||||||
puts [exec /usr/bin/wget -q --no-check-certificate -O- "${version_url}"]
|
puts [exec /usr/bin/wget -q --no-check-certificate -O- "${version_url}"]
|
||||||
|
|
Loading…
Reference in New Issue