MINI MINI MANI MO

Path : /proc/self/root/lib64/perl5/vendor_perl/auto/Newt/Panel/
File Upload :
Current File : //proc/self/root/lib64/perl5/vendor_perl/auto/Newt/Panel/Draw.al

# 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 732 "blib/lib/Newt.pm (autosplit into blib/lib/auto/Newt/Panel/Draw.al)"
sub Newt::Panel::Draw {
  my ($self) = @_;
  
  $self->Pack();
  $self->Hide if(@TOP && $TOP[-1] ne $self);
  if(!$self->{drawed}) {
      if(exists($self->{left}) and  exists($self->{top})) {
	Newt::newtGridWrappedWindowAt($self->{g}, $self->{title}, 
				      $self->{left}, $self->{top}); 
      } else {
	Newt::newtGridWrappedWindow($self->{g}, $self->{title});  
      }
      $self->SUPER::Draw();
      $self->{drawed} = 1;
      push(@TOP,$self);
  }
  $self;
}

# end of Newt::Panel::Draw
1;

OHA YOOOO