Issue #324 resolved

Tcl lexer matches "foreach" as "for", then "each"

Pierre Bourdon
created an issue

Simple test case : {{{ foreach a $Machin { puts $a } }}}

Pygments colorates the "for" as a keyword, and doesn't colorate the "each". Attached a patch which fixes the bug.