Bug with alias checking

[georgtree]

When we check the alias collision with switch name, we check not against switch name, but any name, which includes parameter:

if {$name in [dict keys $aliases]} {
     return -code error "collision of switch -[dict get $aliases $name] alias with the -$name switch"
}