[libcode-tidyall-perl] 209/374: Filter just files from git status in Code::TidyAll::Git::Precommit (Pedro Melo)

[Jonas Smedegaard]

This is an automated email from the git hooks/post-receive script.

js pushed a commit to branch master
in repository libcode-tidyall-perl.

commit cefe795d62ce4454636c639da86d00d94611511d
Author: Jonathan Swartz <swartz at pobox.com>
Date:   Mon Sep 10 04:59:09 2012 -0700

    Filter just files from git status in Code::TidyAll::Git::Precommit (Pedro Melo)
---
 Changes                           |    4 ++++
 lib/Code/TidyAll/Git/Precommit.pm |    2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index 9e4e0c2..ed8dcef 100644
--- a/Changes
+++ b/Changes
@@ -12,6 +12,10 @@ Revision history for Code-TidyAll
   - Allow tidyall.el to work in narrowed regions
   - Make plugins into Moo classes, pass configuration as attributes
 
+* Fixes
+  - Remove unused SVN::Look - perl-code-tidyall/pull/1 (Pedro Melo)
+  - Filter just files from git status in Code::TidyAll::Git::Precommit (Pedro Melo)
+
 0.07  Sep 5, 2012
 
 * Improvements
diff --git a/lib/Code/TidyAll/Git/Precommit.pm b/lib/Code/TidyAll/Git/Precommit.pm
index d51c488..0e5a459 100644
--- a/lib/Code/TidyAll/Git/Precommit.pm
+++ b/lib/Code/TidyAll/Git/Precommit.pm
@@ -40,7 +40,7 @@ sub check {
 
         # Gather file paths to be committed
         my $output = capturex( $self->git_path, "status", "--porcelain" );
-        my @files = ( $output =~ /^[MA]\s+(.*)/gm );
+        my @files = grep { -f } ( $output =~ /^[MA]\s+(.*)/gm );
 
         my $tidyall = $tidyall_class->new_from_conf_file(
             $conf_file,

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libcode-tidyall-perl.git