Tk::Text inserts odd text (!!) on Control-S event

[asb-capfan]

When I click Control + S in a text widget, I get a symbol that looks like 2 exclamation marks (!!).

Here is a test program:

#!perl

use strict;
use warnings;
use Tk;
use Tk::Text;

my $mw = tkinit();
my $text = $mw->Text()->pack();

$mw->MainLoop();

I'm on Windows with ActiveState Perl 5.16.3 and Tk 804.03. Is it only me or can you reproduce it?

[eserte]

Yes, I can reproduce it on X11 systems — all Control- combinations which were not defined for editor commands inserted something.

The fix will be part of the next dev release 804.032_501.