File Coverage

lib/UR/Object/Type/View/Default/Text.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package UR::Object::Type::View::Default::Text;
2              
3 1     1   14 use strict;
  1         1  
  1         29  
4 1     1   3 use warnings;
  1         1  
  1         75  
5             require UR;
6             our $VERSION = "0.46"; # UR $VERSION;
7              
8             UR::Object::Type->define(
9             class_name => __PACKAGE__,
10             is => 'UR::Object::View::Default::Text',
11             has => [
12             default_aspects => { is => 'ARRAY', is_constant => 1, value => ['is','direct_property_names'], },
13             ],
14             );
15              
16              
17             1;
18              
19             =pod
20              
21             =head1 NAME
22              
23             UR::Object::Type::View::Default::Text - View class for class metaobjects
24              
25             =head1 DESCRIPTION
26              
27             This class is used by L and L
28             to construct the text outputted.
29              
30             =cut