OpenPKG CVS Repository http://cvs.openpkg.org/ ____________________________________________________________________________
Server: cvs.openpkg.org Name: Thomas Lotterer Root: /e/openpkg/cvs Email: [EMAIL PROTECTED] Module: openpkg-re Date: 14-Jul-2003 17:13:13 Branch: HEAD Handle: 2003071416131200 Modified files: openpkg-re fsllint.pl Log: add comment header check Summary: Revision Changes Path 1.2 +13 -0 openpkg-re/fsllint.pl ____________________________________________________________________________ patch -p0 <<'@@ .' Index: openpkg-re/fsllint.pl ============================================================================ $ cvs diff -u -r1.1 -r1.2 fsllint.pl --- openpkg-re/fsllint.pl 8 Jul 2003 07:42:27 -0000 1.1 +++ openpkg-re/fsllint.pl 14 Jul 2003 15:13:12 -0000 1.2 @@ -253,6 +253,19 @@ sub check_comment { my ($file, $spec) = @_; + my ($pkg); + + # determine package name + $pkg = $file; + $pkg =~ s|^.+/||; + $pkg =~ s|^fsl\.||; + + # check comment header + my $re = ""; + $re .= "##\\n## fsl.$pkg -- OSSP fsl configuration\\n##\\n\\n"; + if ($spec !~ m|^$re|os) { + &lint_warning($file, "", "", "invalid comment header (expected $re)"); + } # check for comment indentation my $done .= $`; my $this = $&; my $todo = $'; @@ . ______________________________________________________________________ The OpenPKG Project www.openpkg.org CVS Repository Commit List [EMAIL PROTECTED]