diff --git a/templates/ContentGenerator/Instructor/PGProblemEditor/pg_critic.html.ep b/templates/ContentGenerator/Instructor/PGProblemEditor/pg_critic.html.ep
index 7659b7453c..33de2acdcf 100644
--- a/templates/ContentGenerator/Instructor/PGProblemEditor/pg_critic.html.ep
+++ b/templates/ContentGenerator/Instructor/PGProblemEditor/pg_critic.html.ep
@@ -2,7 +2,11 @@
%
<%= maketext('PG Critic Violations') %>
- % my @pgCriticViolations = grep { $_->policy =~ /^Perl::Critic::Policy::PG::/ } @$violations;
+ % my @pgCriticViolations = grep { $_->policy =~ /^Perl::Critic::Policy::PG::/ } @$violations;
+ % my @perlCriticViolations = grep { $_->policy !~ /^Perl::Critic::Policy::PG::/ } @$violations;
+ % unless (@pgCriticViolations || @perlCriticViolations) {
+
<%= maketext('Congratulations! No PG critic violations found.') %>
+ % }
% if (@pgCriticViolations) {
<%= maketext('The following PG issues should be fixed:') %>
- %}
- % my @perlCriticViolations = grep { $_->policy !~ /^Perl::Critic::Policy::PG::/ } @$violations;
+ % }
% if (@perlCriticViolations) {
<%= maketext('The following general Perl issues should be fixed:') %>
- %}
+ % }