luxferre/tii
1
0
Fork 0
Code Actions Activity

Hardcode maxids to 12

Browse Source
This commit is contained in:
Luxferre
2024-10-21 17:53:50 +03:00
parent c34fba498a
commit c026d35753
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tiifetch.tcl
+4 -4
View File
@@ -217,10 +217,10 @@ proc fetchiidb {url echos dbdir dolog} {
}
}
if {$dolog eq 1} {puts "Echomap built"}
# detect how many message IDs we can pass in a single query
# set how many message IDs we can pass in a single query
# (assuming the maximum GET length is 256 chars)
# then we assume 21 character per message ID
set maxids [expr {int(256 / 21)}]
# and we assume 21 character per message ID
set maxids 12
# pass the echo list and fetch the message IDs
# now, process the map we've built
dict for {echoname msgids} $echomap {
@@ -238,7 +238,7 @@ proc fetchiidb {url echos dbdir dolog} {
}]
# save the echo index file with all message IDs
writefileln $echofile [join $msgids "\n"]
if {$dolog eq 1} {puts "Fetching [llength $newmsgids] new messages from $echoname, $maxids messages per request..."}
if {$dolog eq 1} {puts "Fetching [llength $newmsgids] new messages from $echoname..."}
set idgroups ""
set grcount 0
set localcount 0