Update of /cvsroot/module-build/Module-Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18481
Modified Files:
doc_check.pl
Log Message:
Separate the actions from the methods
Index: doc_check.pl
===================================================================
RCS file: /cvsroot/module-build/Module-Build/doc_check.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- doc_check.pl 16 Oct 2005 00:05:07 -0000 1.1
+++ doc_check.pl 16 Oct 2005 00:14:53 -0000 1.2
@@ -8,11 +8,16 @@
if (@ARGV==2) {
- $subs{$1}++ if m/^\s*sub\s+([^_\W]\w+)/;
+ m/^\s*sub\s+ACTION_(\w+)/ ? $actions{$1}++ :
+ m/^\s*sub\s+([^_\W]\w+)/ ? $subs{$1}++ :
+ undef;
} else {
- $docs{$1}++ if m/^=item (\w+)\(/;
+ $docs{$1}++ if m/^=item (\w+)/;
}
END{
+ print "Methods:";
print ($docs{$_} ? "$_*" : $_) for sort keys %subs;
+ print "\nActions:";
+ print ($docs{$_} ? "$_*" : $_) for sort keys %actions;
}
|
