—package
Git::Raw::Error::Category;
$Git::Raw::Error::Category::VERSION
=
'0.55'
;
# TRIAL
use
strict;
use
warnings;
use
Carp;
sub
AUTOLOAD {
# This AUTOLOAD is used to 'autoload' constants from the constant()
# XS function.
my
$constname
;
our
$AUTOLOAD
;
(
$constname
=
$AUTOLOAD
) =~ s/.*:://;
croak
"&Git::Raw::Error::Category::constant not defined"
if
$constname
eq
'_constant'
;
my
(
$error
,
$val
) = _constant(
$constname
);
if
(
$error
) { croak
$error
; }
{
no
strict
'refs'
;
*$AUTOLOAD
=
sub
{
$val
};
}
goto
&$AUTOLOAD
;
}
use
Git::Raw;
=head1 NAME
Git::Raw::Error::Category - Error category class
=head1 VERSION
version 0.55
=head1 DESCRIPTION
A L<Git::Raw::Error::Category> represents an error category or classification.
B<WARNING>: The API of this module is unstable and may change without warning
(any change will be appropriately documented in the changelog).
=head1 AUTHOR
Alessandro Ghedini <alexbio@cpan.org>
Jacques Germishuys <jacquesg@striata.com>
=head1 LICENSE AND COPYRIGHT
Copyright 2014 Alessandro Ghedini.
This program is free software; you can redistribute it and/or modify it
under the terms of either: the GNU General Public License as published
by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.
=cut
1;
# End of Git::Raw::Error::Category