diff options
| -rw-r--r-- | lib/Plack/Middleware/Class/Refresh.pm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/Plack/Middleware/Class/Refresh.pm b/lib/Plack/Middleware/Class/Refresh.pm index 453e6f1..d30e2de 100644 --- a/lib/Plack/Middleware/Class/Refresh.pm +++ b/lib/Plack/Middleware/Class/Refresh.pm @@ -10,9 +10,12 @@ use base 'Plack::Middleware'; sub call { my $self = shift; - my @changed = Class::Refresh->modified_modules; - warn "Classes " . join(', ', @changed) . " have been changed, refreshing" - if $self->verbose && @changed; + if ($self->verbose && (my @changed = Class::Refresh->modified_modules)) { + warn ((@changed > 1 + ? "Classes " . join(', ', @changed) . " have" + : "Class $changed[0] has") + . " been changed, refreshing"); + } Class::Refresh->refresh; |