Tk: Toplevel funktioniert nicht bei 2tem Aufruf - #147097 (Graphische Oberflächen)

2011-03-29 17:06

User since
2003-08-04
12208 Artikel
Admin1

statt:

Code (perl): (dl )

1
2
3

sub get_mlistbox_choice_index{ ... }

...->activate(get_mlistbox_choice_index(...));

Code (perl): (dl )

1
2
3

my $get_mlistbox_choice_index = sub { ... }

...->activate($get_mlistbox_choice_index->(...));

dann werden die subs jedesmal neu definiert. und die warnungen wegen "will not stay shared" sollten dann auch verschwinden.

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem