diff --git a/config.txt b/config.txt index 4db8976..7687296 100644 --- a/config.txt +++ b/config.txt @@ -1,4 +1,4 @@ -useragent "curl/7.54.2" +useragent "tii/current" proxyhost "" proxyport "0" tiix_font "Fira Code" diff --git a/tiifetch.tcl b/tiifetch.tcl index e41a30e..fe30ee8 100755 --- a/tiifetch.tcl +++ b/tiifetch.tcl @@ -245,7 +245,8 @@ proc fetchiidb {url echos dbdir dolog} { # pre-filter the new message IDs to fetch set newmsgids [listcomp $msgids $oldmsgids] # save the echo index file with all message IDs - writefileln $echofile [join $msgids "\n"] + set msgids [list {*}$oldmsgids {*}$newmsgids] + writefileln $echofile [string cat [string trimright [join $msgids "\n"]] "\n"] if {$dolog eq 1} {puts "Fetching [llength $newmsgids] new messages from $echoname..."} set idgroups "" set grcount 0