diff options
Diffstat (limited to 'library/fontchooser.tcl')
| -rw-r--r-- | library/fontchooser.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/library/fontchooser.tcl b/library/fontchooser.tcl index 3aaa6b7..84e2af8 100644 --- a/library/fontchooser.tcl +++ b/library/fontchooser.tcl @@ -238,6 +238,7 @@ proc ::tk::fontchooser::Create {} { wm minsize $S(W) $min [::tk::ScaleNum 260] bind $S(W) <Return> [namespace code [list Done 1]] + bind $S(W) <KP_Enter> [namespace code [list Done 1]] bind $S(W) <Escape> [namespace code [list Done 0]] bind $S(W) <Map> [namespace code [list Visibility %W 1]] bind $S(W) <Unmap> [namespace code [list Visibility %W 0]] |