############################################################################## # $URL: http://perlcritic.tigris.org/svn/perlcritic/trunk/distributions/Perl-Critic/lib/Perl/Critic/Exception/Configuration/Generic.pm $ # $Date: 2011-12-21 14:40:10 -0800 (Wed, 21 Dec 2011) $ # $Author: thaljef $ # $Revision: 4106 $ ############################################################################## package Perl::Critic::Exception::Configuration::Generic; use 5.006001; use strict; use warnings; use Readonly; our $VERSION = '1.117'; #----------------------------------------------------------------------------- use Exception::Class ( 'Perl::Critic::Exception::Configuration::Generic' => { isa => 'Perl::Critic::Exception::Configuration', description => q{A problem with Perl::Critic configuration that isn't related to an option.}, alias => 'throw_generic', }, ); #----------------------------------------------------------------------------- Readonly::Array our @EXPORT_OK => qw< throw_generic >; #----------------------------------------------------------------------------- 1; __END__ #----------------------------------------------------------------------------- =pod =for stopwords =head1 NAME Perl::Critic::Exception::Configuration::Generic - A problem with L configuration that doesn't involve an option. =head1 DESCRIPTION A representation of a problem found with the configuration of L, whether from a F<.perlcriticrc>, another profile file, or command line. This covers things like file reading and parsing errors. =head1 INTERFACE SUPPORT This is considered to be a public class. Any changes to its interface will go through a deprecation cycle. =head1 CLASS METHODS =over =item C<< throw( message => $message, source => $source ) >> See L. =item C<< new( message => $message, source => $source ) >> See L. =back =head1 AUTHOR Elliot Shank =head1 COPYRIGHT Copyright (c) 2007-2011 Elliot Shank. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of this license can be found in the LICENSE file included with this module. =cut # Local Variables: # mode: cperl # cperl-indent-level: 4 # fill-column: 78 # indent-tabs-mode: nil # c-indentation-style: bsd # End: # ex: set ts=8 sts=4 sw=4 tw=78 ft=perl expandtab shiftround :