From: Nicholas Clark <nick@ccl4.org>
Date: Tue, 8 Nov 2011 13:29:08 +0000 (+0100)
Subject: buildtoc --showfiles should only list the files to regenerated.
X-Git-Tag: accepted/trunk/20130322.191538~2111^2~13
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=45f5b240fba94effa0c3b0357368ee11ea3a7441;p=platform%2Fupstream%2Fperl.git

buildtoc --showfiles should only list the files to regenerated.

This fixes a bug caused by the refactoring of commit 9dce16cd064e70e6,
which caused --showfiles to always list list all known files, irrespective
of which had been specified with command line flags.
---

diff --git a/pod/buildtoc b/pod/buildtoc
index 142708f..fc49da9 100644
--- a/pod/buildtoc
+++ b/pod/buildtoc
@@ -96,7 +96,7 @@ __USAGE__
 		   File::Spec->catfile(@d ?
 				       (@d == 1 && $d[0] eq '' ? () : @d)
 				       : "pod", $f);
-	       } @Targets{@files}),
+	       } values %Build),
           "\n";
       exit(0);
   }