I may be missing something hugely obvious here, but in the following simple test case: 

use strict;
use warnings;
use Tk;

my $mw = MainWindow->new();

my $frame = $mw->Frame->pack();

populate();

$frame->Button(-command=>\&recompose)->pack();

MainLoop;

sub recompose
{
    $frame->destroy();
    $frame = $mw->Frame->pack;
    populate()

}

sub populate
{
    for (1..10)
    {
        $frame->Label(-text=>$_)->pack();
    }
}

[download]

clicking the button makes the main window resize itself to absolute minimal size (so the numbers can't be seen). To see the numbers the window has to be manually resized. Is this supposed to happen? Is there a call I can make to get the MainWindow to programmatically resize based on its new contents?

TIA

Update: liverpole has pointed out by /msg that he isn't having this problem, and at that point I suddenly remember I'm running cvs Tk on Perl 5.9.5, which might explain the odd behaviour (OS is Debian Etch). Does anyone else not see the numbers 1..10 after clicking on the button? I've reworded the question a bit to try and make the problem clearer.

Update: zentara has rightly pointed out that I probably shouldn't be doing this anyway.

--------------------------------------------------------------

"If there is such a phenomenon as absolute evil, it consists in treating another human being as a thing."
John Brunner, "The Shockwave Rider".

In reply to Tk Mainwindow resizing after child destroyed by g0n

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.