Branch Coverage

lib/Kephra/File.pm
Criterion Covered Total %
branch 0 118 0.0


line true false branch
14 0 0 if not defined $doc_nr or ref $doc_nr
15 0 0 unless Kephra::Document::Data::get_attribute('modified', $doc_nr)
18 0 0 if Kephra::App::TabBar::_config()->{'info_symbol'}
24 0 0 if not defined $doc_nr or ref $doc_nr
25 0 0 if Kephra::Document::Data::get_attribute('modified', $doc_nr)
41 0 0 unless $file
42 0 0 unless (-e $file)
43 0 0 if defined $last_check and $last_check eq 'ignore'
50 0 0 if ($last_change != $current_age)
51 0 0 if defined $last_check and $last_check eq 'ignore' || $last_check >= $current_age
59 0 0 unless $current_doc == Kephra::Document::Data::current_nr()
66 0 0 unless defined $path and -e $path
74 0 0 unless $file
76 0 0 if (-e $file) { }
79 0 0 if ($allow eq 'ask') { }
85 0 0 if $answer == &Wx::wxYES
86 0 0 if $answer == &Wx::wxNO
88 0 0 unless $allow
100 0 0 -d $_ ? :
114 0 0 if (-d $path) { }
115 0 0 if not $recursive or $_ eq '.' or $_ eq '..'
134 0 0 if (ref $files eq 'ARRAY')
146 0 0 if ($file_path and -e $file_path) { }
156 0 0 if Kephra::App::EditPanel::Margin::_config()->{'linenumber'}{'autosize'} and Kephra::App::EditPanel::Margin::_config()->{'linenumber'}{'width'}
176 0 0 unless defined $nr
181 0 0 unless $ep->GetModify == 1 or $$save_config{'unchanged'}
182 0 0 if $$save_config{'tilde_backup'} == 1
193 0 0 if ($ep->GetModify == 1 or $$save_config{'unchanged'})
194 0 0 if ($file and -e $file) { }
195 0 0 if (not -w $file) { }
203 0 0 if $$save_config{'reload_config'} == 1 and Kephra::Document::Data::get_attribute('config_file')
217 0 0 if ($file and check_b4_overwite($file))
220 0 0 unless $oldname
244 0 0 if $file and check_b4_overwite($file)
254 0 0 if ($new_path_name)
256 0 0 if $old_path_name
271 0 0 unless $unsaved
273 0 0 if ($unsaved == 1 and can_save()) { }
279 0 0 if (shift())->{'modified'}
286 0 0 unless $unsaved
291 0 0 if $doc_nr != $cdoc_nr and $name and $mod
293 0 0 if ($need_save_other) { }
0 0 elsif (can_save() and Kephra::Document::Data::get_file_path()) { }
296 0 0 if $$file{'modified'} and $$file{'file_name'}
326 0 0 if ($ep->GetModify == 1 or $$config{'unchanged'} eq 1)
327 0 0 if ($ep->GetTextLength > 0 or $$config{'empty'} eq 1)
328 0 0 if ($$config{'b4_close'} eq 'ask' or $$config{'b4_close'} eq '2')
333 0 0 if $save_answer == &Wx::wxCANCEL
334 0 0 if ($save_answer == &Wx::wxYES or $$config{'b4_close'} eq '1') { }
336 0 0 if $ep->GetModify
348 0 0 $_ != $doc_nr ? :
360 0 0 if ($file)
367 0 0 if ($buffer == 1) { }
0 0 elsif ($buffer > 1) { }
376 0 0 if ($switch)
377 0 0 $close_last ? :
382 0 0 if Kephra::Document::Data::get_file_path($doc_nr)
386 0 0 unless $close_last and $switch
399 0 0 $_ != $doc_nr ? :