foo = [\column -> set column [treeViewColumnTitle := printf "%s (match %d)" name (length candidnates)]]