File Coverage

blib/lib/Pipeline/Error/Abstract.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod	1	1	100.0
total	20	20	100.0

package Pipeline::Error::Abstract;

use strict;

use Error;
use base qw( Error );

our $VERSION = "3.12";

sub new {
  my $class = shift;

  my $caller = caller(1);
  my $text = "cannnot call abstract method in $caller";

  local $Error::Depth = $Error::Depth + 1;
  local $Error::Debug = 1;  # Enables storing of stacktrace

  $class->SUPER::new(-text => $text, @_);
}

1;

=head1 NAME

Pipeline::Error::Abstract - exception thrown from abstract methods

=head1 SYNOPSIS

  use Pipeline::Error::Abstract;

  throw Pipeline::Error::Abstract;

=head1 DESCRIPTION

C inherits from C and will be thrown by
any non-implemented abstract methods in the Pipeline module.

=head1 SEE ALSO

C C

=head1 AUTHOR

James A. Duncan

=head1 COPYRIGHT

Copyright 2003 Fotango Ltd. All Rights Reserved.

This module is released under the same license as Perl itself.

=cut