$EVENT=Gtk::Gdk->event_new(); segfault


I wrote a gtk-perl script that produces a gtkrc file and afterwards
sends the signal _GTK_READ_RCFILES so that the gtk theme is updated
in all running gtk applications. This works fine on my computer, but
one of the (4) users of the script reported a segfault occurring. We
managed to isolate the code in which this happens, and I included a 
small test program below. The segfault seems to be caused by the line


Is this a bug of gtk-perl, or am I doing something wrong? The user also
included some information about his system, and a 'strace', which I 
will also include below. 


test program:
#!/usr/bin/perl -w

use Gtk;
use Gtk::Gdk::ImlibImage;
use Gtk::Gdk::Pixbuf;
init Gtk;

my $EVENT="";
$EVENT->{'message_type'}=Gtk::Gdk::Atom->intern("_GTK_READ_RCFILES", 0);

sub gtkrc_refresh {
    Gtk::Gdk->event_send_clientmessage_toall ($EVENT);

sub kde_refresh {


print "ok\n";
system info:
[10:09] (pts/2) root darkman:~# apt-cache show libgtk-perl
Package: libgtk-perl
Priority: optional
Section: interpreters
Installed-Size: 1724
Maintainer: Paolo Molaro <lupus debian org>
Architecture: i386
Version: 0.7008-1.2
Depends: perl (>= 5.6.1-5), perlapi-5.6.1, libc6 (>= 2.2.4-4), libglib1.2
(>= 1.2.0), libgtk1.2 (>= 1.2.10-2.1), xlibs (>> 4.1.0)
[12:09] (pts/3) darkman darkman:~/tmp> ./t.pl
Segmentation fault
[12:12] (pts/3) darkman darkman:~/tmp>



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]