Dear monks
Running the following simple Tk script on macOS (High Sierra), Perl 5.26.1 I get a "Segmentation fault 11". It must have to do with the loading of the png. Any idea? A bug?
use strict;
use warnings;
use Tk;
use Tk::PNG;
my $png_image_file = 'annotate.png';
my $mw = Tk::MainWindow->new();
my $pic = $mw->Photo(-file => $png_image_file);
my $btn = $mw->Button(
-text => "Button mit PNG-Datei als Bild",
-compound => 'top',
-image => $pic,
);
$btn->pack(-padx => 10, -pady => 10,);
$mw->MainLoop();
exit(0);
On top of this, I have a strange behavior of Tk entry widgets. If I change the layout of my keyboard, this change does NOT affect the Tk widgets! All other applications accepts the input of the new keyboard layout (I change it from Russian - my standard - to English or others) but Perl Tk seems not to see this. How can this be?
PS: Perl Tk looks really bad on macOS (compared for example to Windows)... really '90s!