# NOTE: Derived from blib/lib/Newt.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package Newt::Panel; #line 786 "blib/lib/Newt.pm (autosplit into blib/lib/auto/Newt/Panel/Hide.al)" sub Newt::Panel::Hide { my $self = shift; my @tops = (); return unless $self->{drawed}; while(my $top = pop(@TOP)) { Newt::PopWindow(); $top->{drawed} = 0; last if($top eq $self); unshift @tops,$top; } for(@tops) { $_->Draw; } $self; } # Below is the stub of documentation for your module. You better edit it! 1; # end of Newt::Panel::Hide