Re: Tk::Stderr flush

sub OnWithdraw{
    my $window = shift;
    my $text   = $window->Subwidget('text');
    $text->delete('0.0', 'end');
    $window->withdraw;
    return;
}


#~     $mw->protocol(WM_DELETE_WINDOW => [ $mw => 'withdraw' ]);
    $mw->protocol(WM_DELETE_WINDOW => [ $mw => 'OnWithdraw' ]);
[download]

Comment on Re: Tk::Stderr flush Download Code

Replies are listed 'Best First'.
Re^2: Tk::Stderr flush by honyok (Sexton) on Sep 17, 2012 at 20:24 UTC
That is anonymously it! You are a monk among monks! we are the music makers and we are the dreamers of dreams - ww	[reply]