commit c026d357531e952367e19631d7859e86ccca45a7 parent c34fba498a74bebccfcf65c6d13cf26509b8d09e Author: Luxferre <lux@ferre> Date: Mon, 21 Oct 2024 17:53:50 +0300 Hardcode maxids to 12 Diffstat:
| M | tiifetch.tcl | | | 8 | ++++---- |
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/tiifetch.tcl b/tiifetch.tcl @@ -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