[libcode-tidyall-perl] 308/374: handle local files in -l/--list
Jonas Smedegaard
js at alioth.debian.org
Sun Sep 29 22:26:40 UTC 2013
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 069e0c91da3708b873c617310b9e8bb2ee5f4275
Author: Jonathan Swartz <swartz at pobox.com>
Date: Tue Oct 9 15:13:54 2012 -0700
handle local files in -l/--list
---
lib/Code/TidyAll.pm | 1 +
1 file changed, 1 insertion(+)
diff --git a/lib/Code/TidyAll.pm b/lib/Code/TidyAll.pm
index abdebaf..55d1a82 100644
--- a/lib/Code/TidyAll.pm
+++ b/lib/Code/TidyAll.pm
@@ -194,6 +194,7 @@ sub list_files {
my ( $self, @files ) = @_;
foreach my $file (@files) {
+ $file = realpath($file) || rel2abs($file);
my $path = $self->_small_path($file);
if ( my @plugins = $self->plugins_for_path($path) ) {
printf( "%s (%s)\n", $path, join( ", ", map { $_->name } @plugins ) );
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libcode-tidyall-perl.git
More information about the Pkg-perl-cvs-commits
mailing list