Skip to content

Instantly share code, notes, and snippets.

@yyamasak
Last active May 14, 2019 06:26
Show Gist options
  • Save yyamasak/98c7ca0775c7f45ba5acb5355a368ccc to your computer and use it in GitHub Desktop.
Save yyamasak/98c7ca0775c7f45ba5acb5355a368ccc to your computer and use it in GitHub Desktop.
I prefer UNIX key binding on Tk 8.6 console.
set tk_motif_binding_script {
event delete <<SelectAll>>
event add <<SelectAll>> <Control-Key-slash>
event add <<PrevChar>> <Control-Key-b> <Control-Lock-Key-B>
event add <<NextChar>> <Control-Key-f> <Control-Lock-Key-F>
event add <<PrevLine>> <Control-Key-p> <Control-Lock-Key-P>
event add <<NextLine>> <Control-Key-n> <Control-Lock-Key-N>
event add <<LineStart>> <Control-Key-a> <Control-Lock-Key-A>
event add <<LineEnd>> <Control-Key-e> <Control-Lock-Key-E>
event add <<SelectPrevChar>> <Control-Key-B> <Control-Lock-Key-b>
event add <<SelectNextChar>> <Control-Key-F> <Control-Lock-Key-f>
event add <<SelectPrevLine>> <Control-Key-P> <Control-Lock-Key-p>
event add <<SelectNextLine>> <Control-Key-N> <Control-Lock-Key-n>
event add <<SelectLineStart>> <Control-Key-A> <Control-Lock-Key-a>
event add <<SelectLineEnd>> <Control-Key-E> <Control-Lock-Key-e>
}
eval $tk_motif_binding_script
console eval $tk_motif_binding_script
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment