diff --git a/tiifetch.tcl b/tiifetch.tcl index fe30ee8..cd254d4 100755 --- a/tiifetch.tcl +++ b/tiifetch.tcl @@ -236,6 +236,7 @@ proc fetchiidb {url echos dbdir dolog} { # pass the echo list and fetch the message IDs # now, process the map we've built dict for {echoname msgids} $echomap { + if {![string match *.* $echoname]} {continue} # get the existing message IDs in the echo set echofile [file join $echodir $echoname] set oldmsgids ""