| line |
true |
false |
branch |
|
33
|
0 |
2 |
unless my $identity = $self->{'MBMU_id'} = $args->{'identity'} |
|
38
|
2 |
0 |
unless ($top->blessed) |
|
66
|
0 |
0 |
if (@_) { } |
|
78
|
0 |
0 |
unless my $top = $self->topFolder |
|
80
|
0 |
0 |
unless shift @path eq $top->name |
|
88
|
0 |
0 |
unless my $top = $self->topFolder |
|
91
|
0 |
0 |
unless shift @path eq $top->name |
|
105
|
0 |
0 |
unless (defined $dir) |
|
107
|
0 |
0 |
unless $args{'create_supers'} |
|
110
|
0 |
0 |
unless my $upper = $name =~ s/$delim$base//r |
|
115
|
0 |
0 |
if (not defined $id) { } |
|
|
0 |
0 |
elsif ($args{'deleted'}) { } |
|
|
0 |
0 |
elsif ($id->deleted) { } |
|
133
|
0 |
0 |
if not exists $args{'create_real'} or $args{'create_real'} |
|
141
|
0 |
0 |
unless my $folder = $self->folder($name) |
|
150
|
0 |
0 |
unless my $old = $self->folder($oldname) |
|
154
|
0 |
0 |
unless (defined $newdir) |
|
156
|
0 |
0 |
unless $args{'create_supers'} |
|
159
|
0 |
0 |
unless my $upper = $newname =~ s/$delim$base//r |
|
167
|
0 |
0 |
unless $oldlocation eq $newlocation |