From: Tomas Doran Date: Sat, 8 May 2010 15:56:19 +0000 (+0100) Subject: Add a little more changelog and comments X-Git-Tag: 1.28~5 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Devel.git;a=commitdiff_plain;h=c06769de7787e0fea813df0d5327c096fb6788d9 Add a little more changelog and comments --- diff --git a/Changes b/Changes index b1594ef..40e93b3 100644 --- a/Changes +++ b/Changes @@ -1,7 +1,8 @@ This file documents the revision history for Perl extension Catalyst-Devel. - Fix the pod-coverage version required by the generated app tests. - - Fix the restarter to only act upon file events. + - Fix the restarter to only act upon file events (and ergo ignore + the creation of empty directories. 1.27 2010-02-23 10:44:20 - Add the catalyst_par_options option. diff --git a/lib/Catalyst/Restarter.pm b/lib/Catalyst/Restarter.pm index 104ce5a..d5b9b55 100644 --- a/lib/Catalyst/Restarter.pm +++ b/lib/Catalyst/Restarter.pm @@ -74,7 +74,7 @@ sub BUILD { qr(/\.[^/]*/?$), # match hidden dirs ]; - # keep filter regexp to make shure we don't restart on deleted + # keep filter regexp to make sure we don't restart on deleted # files or directories where we can't check -d $self->_filter( $p->{filter} ); @@ -111,6 +111,8 @@ sub _handle_events { my @events = @_; my @files; + # Filter out any events which are the creation / deletion of directories + # so that creating an empty directory won't cause a restart for my $event (@events) { my $path = $event->path(); my $type = $event->type();