diff options
Diffstat (limited to 'library/entry.tcl')
| -rw-r--r-- | library/entry.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/library/entry.tcl b/library/entry.tcl index b344a63..bdd9fda 100644 --- a/library/entry.tcl +++ b/library/entry.tcl @@ -308,12 +308,12 @@ proc ::tk::EntryEndIMEMarkedText {w} { bind Entry <Button-2> { if {!$tk_strictMotif} { - ::tk::EntryScanMark %W %x + ::tk::EntryScanMark %W %x } } bind Entry <B2-Motion> { if {!$tk_strictMotif} { - ::tk::EntryScanDrag %W %x + ::tk::EntryScanDrag %W %x } } @@ -415,7 +415,7 @@ proc ::tk::EntryMouseSelect {w x} { } } if {$Priv(mouseMoved)} { - $w icursor $cur + $w icursor $cur } update idletasks } |
