From: Robert 'phaylon' Sedlacek Date: Tue, 12 Jun 2012 22:06:40 +0000 (+0000) Subject: fixed exception namespace X-Git-Tag: v0.001_001~51 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=65e569ee2c34baaca58c5bfed0301a682eda0739;p=scpubgit%2FSystem-Introspector.git fixed exception namespace --- diff --git a/lib/System/Introspector/Util.pm b/lib/System/Introspector/Util.pm index 5943490..d699799 100644 --- a/lib/System/Introspector/Util.pm +++ b/lib/System/Introspector/Util.pm @@ -15,13 +15,13 @@ our @EXPORT_OK = qw( ); do { - package System::Introspection::_Exception; + package System::Introspector::_Exception; use Moo; has message => (is => 'ro'); }; -sub fail { die System::Introspection::_Exception->new(message => shift) } -sub is_report_exception { ref(shift) eq 'System::Introspection::_Exception' } +sub fail { die System::Introspector::_Exception->new(message => shift) } +sub is_report_exception { ref(shift) eq 'System::Introspector::_Exception' } sub files_from_dir { my ($dir) = @_;