Branch Coverage

blib/lib/File/Move/Undoable.pm
Criterion Covered Total %
branch 22 40 55.0


line true false branch
87 3 42 unless my $taid = $args{-'tx_action_id'}
90 0 42 unless defined $source
92 0 42 unless defined $target
94 0 42 unless ref $rsync_opts eq 'ARRAY'
98 0 42 unless my $asource = l_abs_path($source)
99 0 42 unless my $atarget = l_abs_path($target)
104 0 84 if -l $_
109 42 0 if ($same_fs) { }
117 23 19 if ($tx_action eq 'check_state') { }
19 0 elsif ($tx_action eq 'fix_state') { }
118 3 20 if not $se and $te
120 1 19 unless $se
121 0 19 if $te and $same_fs
124 0 19 if ($te or not $same_fs) { }
137 0 0 $te ? :
0 19 if $dry_run
139 0 19 $te ? :
144 19 0 if ($same_fs) { }
146 19 0 if (rename $source, $target) { }
155 0 0 if $?