OpenPKG CVS Repository http://cvs.openpkg.org/ ____________________________________________________________________________
Server: cvs.openpkg.org Name: Ralf S. Engelschall Root: /e/openpkg/cvs Email: [EMAIL PROTECTED] Module: openpkg-re Date: 21-Jul-2003 17:03:56 Branch: HEAD Handle: 2003072116035500 Modified files: openpkg-re speclint.pl Log: check for %NoSource&/%NoPatch and %integrity consistency Summary: Revision Changes Path 1.42 +10 -0 openpkg-re/speclint.pl ____________________________________________________________________________ patch -p0 <<'@@ .' Index: openpkg-re/speclint.pl ============================================================================ $ cvs diff -u -r1.41 -r1.42 speclint.pl --- openpkg-re/speclint.pl 21 Jul 2003 14:46:24 -0000 1.41 +++ openpkg-re/speclint.pl 21 Jul 2003 15:03:55 -0000 1.42 @@ -889,6 +889,16 @@ &lint_warning($file, $done, $this, "found constant \"root\" in %attr (expected variable %{l_susr})"); $done .= $this; } + + # check for %NoSource&/%NoPatch and %integrity consistency + if ($spec =~ m/\n\%No(Source|Patch)/s and $spec !~ m/\n\s*\%integrity/s) { + &lint_error($file, undef, undef, "found \"\%NoSource/\%NoPatch\", but no \"\%integrity\" usage". + " (expected to see \"\%integrity\" in \%setup section)"); + } + if ($spec !~ m/\n\%No(Source|Patch)/s and $spec =~ m/\n\s*\%integrity/s) { + &lint_error($file, undef, undef, "found no \"\%NoSource/\%NoPatch\", but \"\%integrity\" usage". + " (expected to see \"\%NoSource/\%NoPatch\" in source section)"); + } } ## _________________________________________________________________ @@ . ______________________________________________________________________ The OpenPKG Project www.openpkg.org CVS Repository Commit List [EMAIL PROTECTED]