luxferre/tii
1
0
Fork 0
Code Actions Activity

fixed gopher/nex fetching

Browse Source
This commit is contained in:
Luxferre
2024-11-21 19:46:55 +02:00
parent 92fcea502e
commit 4a38c24aba
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tiifetch.tcl
+3 -3
View File
@@ -45,12 +45,12 @@ proc url2dict {inputurl} {
gophers - gophers -
gopher { gopher {
if {$rport eq ""} {set rport 70} if {$rport eq ""} {set rport 70}
set selector [string cat [string range $rpath 1 end] "\r\n"] set selector [string cat "/" [string range $rpath 1 end] "\r\n"]
dict set out handler render_handler_gopher dict set out handler render_handler_gopher
} }
finger { finger {
if {$rport eq ""} {set rport 79} if {$rport eq ""} {set rport 79}
set selector "$selector\r\n" set selector "/$selector\r\n"
} }
spartan { spartan {
if {$rport eq ""} {set rport 300} if {$rport eq ""} {set rport 300}
@@ -63,7 +63,7 @@ proc url2dict {inputurl} {
} }
nex { nex {
if {$rport eq ""} {set rport 1900} if {$rport eq ""} {set rport 1900}
set selector "$selector\r\n" set selector "/$selector\r\n"
} }
gemini { gemini {
if {$rport eq ""} {set rport 1965} if {$rport eq ""} {set rport 1965}