(Replaced by #4265.)

[p5sagit/p5-mst-13.2.git] / lib / Pod / Functions.pm

diff --git a/lib/Pod/Functions.pm b/lib/Pod/Functions.pm
index 5e6551f..03cbf71 100644 (file)
--- a/lib/Pod/Functions.pm
+++ b/lib/Pod/Functions.pm
@@ -65,6 +65,8 @@ while (<DATA>) {
     }
 } 
 
+close DATA;
+
 unless (caller) { 
     foreach $type ( @Type_Order ) {
        $list = join(", ", sort @{$Kinds{$type}});