Commits

Toby Inkster  committed 445e09c

private (no pod coverage)

  • Participants
  • Parent commits b4de348

Comments (0)

Files changed (1)

File lib/Scalar/Does/MooseTypes.pm

 
 use Scalar::Does qw( blessed does looks_like_number -make );
 
-sub is_class_loaded {
+sub _is_class_loaded {
 	return !!0 if ref $_[0];
 	my $stash = do { no strict 'refs'; \%{"$_[0]\::"} };
 	return !!1 if exists $stash->{'ISA'};
 		make_role('GlobRef',   sub { ref $_[0] eq 'GLOB' }),
 		make_role('FileHandle',sub { require IO::Detect; IO::Detect::is_filehandle($_[0]) }),
 		make_role('Object',    sub { blessed($_[0]) }),
-		make_role('ClassName', \&is_class_loaded),
-		make_role('RoleName',  \&is_class_loaded),
+		make_role('ClassName', \&_is_class_loaded),
+		make_role('RoleName',  \&_is_class_loaded),
 		make_role('ScalarRef', sub { ref $_[0] eq 'SCALAR' || ref $_[0] eq 'REF' }),
 		make_role('ArrayRef',  sub { ref $_[0] eq 'ARRAY' }),
 		make_role('HashRef',   sub { ref $_[0] eq 'HASH' }),