diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-08-15 13:51:48 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-08-15 13:51:48 (GMT) |
| commit | 8f1094e7e8d82ef3911ef7acdc67d86b46761674 (patch) | |
| tree | 9f768c9c616bb7a7a05552253799c757b8a8995f /library | |
| parent | f1e3ad19df93e7f00285d4cf236e989c2ad209f5 (diff) | |
| download | tk-8f1094e7e8d82ef3911ef7acdc67d86b46761674.zip tk-8f1094e7e8d82ef3911ef7acdc67d86b46761674.tar.gz tk-8f1094e7e8d82ef3911ef7acdc67d86b46761674.tar.bz2 | |
[Frq 3555324]: On Windows, re-define Ctrl-A for Select-All., as most Windows applications do.
FossilOrigin-Name: e1dfad3532306e2075d9e06715df2f154ecb006b
Diffstat (limited to 'library')
| -rw-r--r-- | library/tk.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/library/tk.tcl b/library/tk.tcl index 7ef25ec..0d8853f 100644 --- a/library/tk.tcl +++ b/library/tk.tcl @@ -417,7 +417,7 @@ switch -exact -- [tk windowingsystem] { event add <<Redo>> <Control-Key-y> <Control-Lock-Key-Y> event add <<ContextMenu>> <Button-3> - event add <<SelectAll>> <Control-Key-slash> + event add <<SelectAll>> <Control-Key-slash> <Control-Key-a> <Control-Lock-Key-A> event add <<SelectNone>> <Control-Key-backslash> event add <<NextChar>> <Right> event add <<SelectNextChar>> <Shift-Right> @@ -427,9 +427,9 @@ switch -exact -- [tk windowingsystem] { event add <<SelectNextWord>> <Control-Shift-Right> event add <<PrevWord>> <Control-Left> event add <<SelectPrevWord>> <Control-Shift-Left> - event add <<LineStart>> <Home> <Control-Key-a> <Control-Lock-Key-A> + event add <<LineStart>> <Home> event add <<SelectLineStart>> <Shift-Home> - event add <<LineEnd>> <End> <Control-Key-e> <Control-Lock-Key-E> + event add <<LineEnd>> <End> event add <<SelectLineEnd>> <Shift-End> event add <<PrevLine>> <Up> event add <<NextLine>> <Down> |