Re: Gtk2::TreePath broken on Debian?

[Matthew Braid <ptkperl mdb id au>]

Replying to myself because of course 35 seconds after I sent this I
'figured out' a workaround.

This code works as expected:

# $wid contains the Gtk2::ComboBox, which already has a filled in model
my $mod = $wid->get_model;
$mod->foreach(sub {
                my ($model, $tpath, $iter, $lookfor) = @_;
                return 0 if $model->get($iter, 1) != $lookfor;
                $wid->set_active_iter($iter); # Do it all here!
                return 1;
              }, "STORED_USER_SELECTION");

There is still something very wrong with the Gtk2::TreePath package in
my installation though.

MB


On 19 April 2010 13:59, Matthew Braid <ptkperl mdb id au> wrote:
> Hi all,
>
> I'm having a lot of 'fun' translating some apps from FreeBSD to
> Debian, and the latest oddity I'm kind of stumped at.
>
> On the old FreeBSD system, gtk-2.10.9_1 is installed, and perl/Gtk2
> 1.141 is installed.
> On the new Debian system, gtk-2.12.12 is installed, and perl/Gtk2
> 1.190 is installed.
>
> This particular app has a Gtk2::ComboBox that, on startup, selects the
> item the user previously had selected last time it was opened. This is
> done with:
>
> # $wid contains the Gtk2::ComboBox, which already has a filled in model
> my $mod = $wid->get_model;
> my $path = undef;
> $mod->foreach(sub {
>                my ($model, $tpath, $iter, $lookfor) = @_;
>                return 0 if $model->get($iter, 1) != $lookfor;
>                $path = $tpath;
>                return 1;
>              }, "STORED_USER_SELECTION");
> $path = Gtk2::TreePath->new(0) if not defined $path;
> $path = $mod->get_iter($path);
> $wid->set_active_iter($path);
>
> This worked perfectly well on the old system, but on the new system it
> complains about $path being undef on the
> "$wid->set_active_iter($path)" line. After digging around, I've
> discovered that no matter what, $mod->get_iter($path) ALWAYS returns
> undef. A little further digging suggests this is because
> Gtk2::TreePath on the new system is completely broken.
>
> For instance, if I change the code to:
>
> # $wid contains the Gtk2::ComboBox which already has a filled in model
> my $mod = $wid->get_model;
> my $path = undef;
> $mod->foreach(sub {
>                my ($model, $tpath, $iter, $lookfor) = @_;
>                return 0 if $model->get($iter, 1) != $lookfor;
>                $path = $tpath;
>                return 1;
>              }, "STORED_USER_SELECTION");
> $path = Gtk2::TreePath->new(0) if not defined $path;
> print "PATH IS ", $path->to_string, "\n";   # <--- NEW LINE HERE
> $path = $mod->get_iter($path);
> $wid->set_active_iter($path);
>
> I get a segfault at $path->to_string. If I instead do this:
>
> # $wid contains the Gtk2::ComboBox which already has a filled in model
> my $mod = $wid->get_model;
> my $path = undef;
> $mod->foreach(sub {
>                my ($model, $tpath, $iter, $lookfor) = @_;
>                return 0 if $model->get($iter, 1) != $lookfor;
>                $path = $tpath;
>                return 1;
>              }, "STORED_USER_SELECTION");
> $path = Gtk2::TreePath->new(0) if not defined $path;
> print "PATH IS ", join(", ", $path->get_indices, "\n";    # <--- NEW LINE HERE
> $path = $mod->get_iter($path);
> $wid->set_active_iter($path);
>
> Instead of $path->get_indicies returning a single number (its a linear
> list after all) I instead get an enormous list of numbers that after a
> minute or so of printing out I eventually have to CTRL-C to stop.
>
> The segfault and the near-endless list of numbers suggests to me
> there's some bad memory management going on in there, which I assume
> $mod->get_iter($path) is masking (an eval or something?) and just
> defaulting to undef, which causes $wid->set_active_iter($path) to
> complain.
>
> So - in lieu of this being fixed (which I hope it will anyway), can
> anyone give me a workaround example of setting a combo box to display
> the item that matches a known string?
>
> TIA,
> MB