system: Linux mars.sprixweb.com 3.10.0-1160.119.1.el7.x86_64 #1 SMP Tue Jun 4 14:43:51 UTC 2024 x86_64
cmd: 

Direktori : /usr/lib64/perl5/vendor_perl/auto/Newt/Panel/
Upload File :
Current File : //usr/lib64/perl5/vendor_perl/auto/Newt/Panel/Run.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 771 "blib/lib/Newt.pm (autosplit into blib/lib/auto/Newt/Panel/Run.al)"
sub Newt::Panel::Run {
  my ($self,$tr) = @_;
  my ($reason, $data);

  $self->Draw;
  $self->upgrade;
  ($reason, $data) = $self->SUPER::Run();
  $self->Hide if($tr);
  if (ref($data)) {
    $data = $self->{refs}{$$data};
  }
  return wantarray ? ($reason, $data) : $data;
}

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