File Coverage

lib/UR/Namespace/Command/List/Classes.pm
Criterion Covered Total %
statement 9 13 69.2
branch n/a
condition n/a
subroutine 3 5 60.0
pod 0 2 0.0
total 12 20 60.0


line stmt bran cond sub pod time code
1              
2             package UR::Namespace::Command::List::Classes;
3              
4 1     1   24 use strict;
  1         1  
  1         29  
5 1     1   3 use warnings;
  1         1  
  1         28  
6 1     1   3 use UR;
  1         2  
  1         20  
7             our $VERSION = "0.46"; # UR $VERSION;
8              
9             UR::Object::Type->define(
10             class_name => __PACKAGE__,
11             is => "UR::Namespace::Command::RunsOnModulesInTree",
12             );
13              
14 0     0 0   sub help_description { "List all classes in the current namespace." }
15              
16             sub for_each_class_object
17             {
18 0     0 0   my $self = shift;
19 0           my $class = shift;
20 0           print $class->class_name,"\n";
21             }
22              
23             1;
24