more test and fixes
[catagits/CatalystX-HelpText.git] / lib / CatalystX / HelpText / Finder / TemplateToolkit.pm
index 07fcc8b..7c5d4b6 100644 (file)
@@ -19,7 +19,7 @@ sub find_helptext_keys_in_fn {
         ABSOLUTE => 1,
     });
     my $out;
-    $t->process($fn, { help_text => sub { push @keys, shift } }, \$out);
+    $t->process($fn, { help_text => sub { my $key = shift; push @keys, $key if ($key) } }, \$out);
     return [ uniq @keys ];
 }