Hi Quentin,
thanks for your responses.
On Wed, 19 May 2004 16:31:34 +0200, Quentin Sculo said:
>This time it should be right :) :
Hmpf, before I can comment on that, I suppose, I have to understand your
code. ;-) OK, let's see what I make out of this and please tell me if I'm
wrong somewhere.
> my $iter=$store->get_iter_first; # or starting point
Easy, let's start with the first iterator.
> while ($iter)
Do the stuff only if the last $iter is not undef.
> { # do something
This would be my check for i.e. a special property.
> $iter=( $store->iter_children($iter)||$store->iter_next($iter) );
My next $iter is either the cild or, if there is no child, just the next
one.
> unless ($iter)
Do the next thing, only if $iter is undefined, that is, if the next $iter
got us nowhere.
> { $iter=$store->iter_next($_) while
Here things start to get unclear. Who sets $_ to what here?
> $_=$store->iter_parent($iter);
Oh, ok, I see, I really have to get used that you can write the reactio
before the actio in Perl. ;-)
Then this has to mean: Set $_ to the iter_parent as often as possible and
afterward $iter will hold the iter of the "toplevel parent".
> }
> }
Wow, if my understanding is correct, I can go through a tree starting
somewhere handling the problems when starting at a child level and not
using a single recursion. Sounds good. :-)
Ciao
Florian
pgpg2rjVwfpZu.pgp
Description: PGP signature
_______________________________________________
gtk-perl-list mailing list
gtk-perl-list@xxxxxxxxx
http://mail.gnome.org/mailman/listinfo/gtk-perl-list
|
