OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Michael Schloh
Root: /e/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-re Date: 11-Mar-2004 16:55:36
Branch: HEAD Handle: 2004031115553500
Modified files:
openpkg-re rclint.pl
Log:
Respective sections should always contain a call to rcService for short
circuiting purposes, and the argument to rcService may contain dashes. In
fact, it should probably always be the package name itself.
Summary:
Revision Changes Path
1.22 +3 -3 openpkg-re/rclint.pl
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-re/rclint.pl
============================================================================
$ cvs diff -u -r1.21 -r1.22 rclint.pl
--- openpkg-re/rclint.pl 20 Jan 2004 16:53:02 -0000 1.21
+++ openpkg-re/rclint.pl 11 Mar 2004 15:55:35 -0000 1.22
@@ -33,7 +33,7 @@
# program information
my $progname = "rclint";
-my $progvers = "0.0.1";
+my $progvers = "0.0.2";
# parameters (defaults)
my $version = 0;
@@ -440,13 +440,13 @@
# check rcService short circuit
if ($section !~ m/^%(config|common|info)$/) {
$done = $outer_done; $this = ''; $todo = $outer_this;
- if ( $todo !~ m/^[^\n]+\n rcService \w+ enable yes \|\| exit 0\n/s ) {
+ if ( $todo !~ m/^[^\n]+\n rcService $pkg enable yes \|\| exit 0\n/s ) {
&lint_warning($file, $done, $this, "section $section: \"rcService ...
enable yes\" short circuit missing");
}
else {
# check rcService package reference
$done = $outer_done; $this = ''; $todo = $outer_this;
- if ( $todo !~ m/\brcService\s+$pkgu\s+/s ) {
+ if ( $todo !~ m/\brcService\s+$pkg\s+/s ) {
&lint_warning($file, $done, $this, "section $section: rcService
referencing wrong package");
}
}
@@ .
______________________________________________________________________
The OpenPKG Project www.openpkg.org
CVS Repository Commit List [EMAIL PROTECTED]
