=head1 NAME
WebService::Cmis::NotImplementedException
=head1 DESCRIPTION
This exception is raised when calling services not implemented
by the client library.
Parent class: Error
=cut
use strict;
use Error ();
our @ISA = qw(Error);
=head1 METHODS
=over 4
=item new()
=cut
sub new {
my $class = shift;
my ($package, $filename, $line, $subroutine) = caller(1);
return $class->SUPER::new(-text=>($subroutine||'')." not implemented yet.\n");
}
=back
=head1 COPYRIGHT AND LICENSE
Copyright 2012-2013 Michael Daum
This module is free software; you can redistribute it and/or modify it under
the same terms as Perl itself. See F<http://dev.perl.org/licenses/artistic.html>.
=cut
1;