don't list directories as pod just files as reported by dha++

stmuk · stmuk · commit f80ef79c4b41 · 2016-04-05T12:43:53.000+01:00
diff --git a/bin/p6doc b/bin/p6doc
@@ -109,7 +109,7 @@ multi sub MAIN(Bool :$l!) {
     my @modules;
     for @paths -> $dir {
         for dir($dir).sort -> $file {
-            @modules.push: $file.basename.Str.subst('.pod','');
+            @modules.push: $file.basename.Str.subst('.pod','') if $file.IO.f;
         }
     }
     @modules.append: get-panda-modules(); 

Original file line number	Diff line number	Diff line change
`@@ -109,7 +109,7 @@ multi sub MAIN(Bool :$l!) {`
`109`	`109`	`my @modules;`
`110`	`110`	`for @paths -> $dir {`
`111`	`111`	`for dir($dir).sort -> $file {`
`112`		`- @modules.push: $file.basename.Str.subst('.pod','');`
	`112`	`+ @modules.push: $file.basename.Str.subst('.pod','') if $file.IO.f;`
`113`	`113`	`}`
`114`	`114`	`}`
`115`	`115`	`@modules.append: get-panda-modules();`