# 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;