Filter by:
File Violation Severity
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
gedcom ControlStructures::ProhibitDeepNests   (kritika/PerlCritic)
Code structure is deeply nested
Warning
670
					@{$dtl->month_format_wide()}[$dt->month - 1] . ' ' .
671
					$dt->year()
672
				);
673
				if($opts{'s'} && !$opts{'G'}) {
674
					$text->translate(300, 450);
675
					if(is_alive(person => $me)) {
676
						$text->text_center('for ' . normalize_name($opts{'h'}));
677
					} else {
678
						my $n = normalize_name($me->as_string(include_years => 1));
679
						$n =~ s/\sC(\d)/ c$1/;
680
						$text->text_center("for $n");