proc update {} { variable sites #putquick "PRIVMSG #tr-beta :Updating..." foreach site $sites { getRSS [lindex $site 0] [lindex $site 1] [lindex $site 2] [lindex $site 3] [lindex $site 4] utimer 10 update } }