File Coverage

lib/UR/Namespace/Command/Define/Datasource/RdbmsWithAuth.pm
Criterion Covered Total %
statement 9 18 50.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod n/a
total 12 22 54.5


line stmt bran cond sub pod time code
1             package UR::Namespace::Command::Define::Datasource::RdbmsWithAuth;
2              
3 2     2   31 use strict;
  2         4  
  2         46  
4 2     2   8 use warnings;
  2         2  
  2         34  
5 2     2   6 use UR;
  2         2  
  2         9  
6             our $VERSION = "0.46"; # UR $VERSION;
7              
8             UR::Object::Type->define(
9             class_name => __PACKAGE__,
10             is => "UR::Namespace::Command::Define::Datasource::Rdbms",
11             has => [
12             login => { is => 'String',
13             doc => 'User to log in with',
14             },
15             auth => {
16             is => 'String',
17             doc => 'Password to log in with',
18             },
19             owner => {
20             is => 'String',
21             doc => 'Owner/schema to connect to',
22             },
23             ],
24             is_abstract => 1,
25             );
26              
27              
28             sub _resolve_module_body {
29 0     0     my $self = shift;
30              
31 0           my $src = $self->SUPER::_resolve_module_body(@_);
32              
33 0           my $login = $self->login;
34 0           $src .= "sub login { '$login' }\n";
35              
36 0           my $auth = $self->auth;
37 0           $src .= "sub auth { '$auth' }\n";
38              
39 0           my $owner = $self->owner;
40 0           $src .= "sub owner { '$owner' }\n";
41              
42 0           return $src;
43             }
44              
45             1;
46