| File: | blib/lib/Genealogy/Wills.pm |
| Coverage: | 96.3% |
| line | % | coverage | condition | ||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 354 | 100 |
| scalar @_ == 1 and not ref $_[0] | ||||||||||||||||||||
| 372 | 100 |
| $params // {} | ||||||||||||||||||||
| 376 | 100 |
| defined $$params{"config_file"} and not -r $$params{"config_file"} | ||||||||||||||||||||
| 389 | 100 |
| &blessed($l) and $l->can("info") and $l->can("error") | ||||||||||||||||||||
| 396 | 67 |
| $$params{"directory"} //= $MODULE_DATA_DIR | ||||||||||||||||||||
| 399 | 100 |
| -d $$params{"directory"} and -r _ | ||||||||||||||||||||
| 662 | 100 |
| $$params{"last"} // "" | ||||||||||||||||||||
| 669 | 100 |
| $$self{"wills"} ||= "Genealogy::Wills::wills"->new("no_entry", 1, "no_fixate", 1, %{$self;}) | ||||||||||||||||||||
| 676 | 100 |
| $$self{"wills"}->selectall_hashref($params) // [] |