view release on metacpan or  search on metacpan

lib/TUI/toolkit.pm  view on Meta::CPAN

  if ( $want{signature} ) {
    if ( XS_PARAMS and not PERL_ONLY ) {
      Type::Params->import::into( $caller, 'signature' );
    }
    else {
      TUI::toolkit::Params->import::into( $caller, 'signature' );
    }
  }

  # Add a dump method to the class if it doesn't already have one
  $^H{ __PACKAGE__ . "/$caller" } = autodie::Scope::Guard->new(sub {
    _add_dump( $caller ) unless $caller->can( 'dump' );
  });

  # exports living in this module
  Importer->import_into( $class, $caller, @{ $EXPORT_TAGS{backend} } );
} #/ sub import

sub unimport {
  my $caller = caller();
  return unless $^H{ __PACKAGE__ . "/$caller" };