Consolidate some duplicated code within the Tcl bindings. (dm)
Consolidate some duplicated code within the Tcl bindings. (dm)

brltty/brltty,brltty/brltty,brltty/brltty,brltty/brltty,brltty/brltty,brltty/brltty