[libcode-tidyall-perl] 323/374: require contents and path

[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 96c12b39f8adac24d37a07ffe5857d3f65315fc2
Author: Jonathan Swartz <swartz at pobox.com>
Date:   Wed Oct 10 10:18:31 2012 -0700

    require contents and path
---
 lib/Code/TidyAll.pm |    1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/Code/TidyAll.pm b/lib/Code/TidyAll.pm
index b64a6e5..306cfff 100644
--- a/lib/Code/TidyAll.pm
+++ b/lib/Code/TidyAll.pm
@@ -256,6 +256,7 @@ sub process_dir {
 sub process_source {
     my ( $self, $contents, $path ) = @_;
 
+    die "contents and path required" unless defined($contents) && defined($path);
     my @plugins = $self->plugins_for_path($path);
     if ( !@plugins ) {
         $self->msg( "[no plugins apply%s] %s",

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