Tk Toolkit

Logged In: YES
user_id=68433

Patch committed now that SF CVS back up again.

Logged In: YES
user_id=68433

Surveyed tcl-core [1]; three of four respondents (all three
of whom are emacs users) agreed that ^V should be "paste"
and not "scroll down".

Jim Ingham (the fourth respondent) wrote: "Control-v should
continue to be scroll down on Mac OS & Mac OS X, since
Command-v is paste, and Control-v never has been paste..."

Updated patch moves Control-v binding into the Mac-specific
section.


[1] <URL:
http://aspn.activestate.com/ASPN/Mail/Message/tcl-core/1825281
>, "Tk Text widget: what should Control-V do?"

Logged In: YES
user_id=68433

Attached patch removes the ^V binding, and updates the
documentation to not mention ^V. Also adds a note that ^X
copies the selection to the clipboard before deleting it.
Did not add a description of ^C, since that would involve
renumbering all the .IP [NN] lines and I'm lazy.

Logged In: YES
user_id=6988

Thanks for the posting a fix; that's helpful.

There's still an issue with pasting, though. If you copy
some text and then select some text somewhere else,
<control> v doesn't replace the highlighted text, but adds
it to the right of the highlighted text.

Logged In: YES
user_id=603528

I found the problem. But I don't know what the solution
should be.

The problem is that in text.tcl, Control-v is bound to some
sort of TextScrollPages operation. This binding is only
done on non-windows systems.

In tk.tcl, Control-Key-v is bound to the virtual event
<<Paste>>, which is what we want as default behavior for a
text widget.

If I comment out the binding code in text.tcl, then all
works as expected.

I suspect that this is just old code that wasn't purged out
from earlier versions of Tk ... for instance, there is no
Meta-v binding (as one would expect if using the emacs
"ctrl-v page forward, meta-v page backward" standard.

Anyway, I'm commenting out the binding on my system. I
think it would be good to remove that code segment in the
final release of 8.4.

Here's the code I'm talking about (from text.tcl) -- in
"commented out" form:

#if {[string compare $tcl_platform(platform) "windows"]} {
#bind Text <Control-v> {
# if {!$tk_strictMotif} {
# tk::TextScrollPages %W 1
# }
#}
#}