$lb->tagConfigure ('cr_link', -foreground => "red");




   $lb->tagBind ('cr_link', "<Button-1>",\&show_cr);