diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-08-15 13:51:48 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-08-15 13:51:48 (GMT) |
| commit | e6aac5ccc80d9f75e8b1e7fb71090eba0329c39d (patch) | |
| tree | 9f768c9c616bb7a7a05552253799c757b8a8995f | |
| parent | 5b214e4a7ee9d69825b3bf122706d33849734318 (diff) | |
| download | tk-e6aac5ccc80d9f75e8b1e7fb71090eba0329c39d.zip tk-e6aac5ccc80d9f75e8b1e7fb71090eba0329c39d.tar.gz tk-e6aac5ccc80d9f75e8b1e7fb71090eba0329c39d.tar.bz2 | |
[Frq 3555324]: On Windows, re-define Ctrl-A for Select-All., as most Windows applications do.
| -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> |