OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Ralf S. Engelschall
Root: /v/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-tools Date: 14-Nov-2006 14:48:28
Branch: HEAD Handle: 2006111413482800
Modified files:
openpkg-tools/cmd lint-rc.pl
Log:
the argument to rcService has to be the original package name; fix
name of program
Summary:
Revision Changes Path
1.9 +4 -4 openpkg-tools/cmd/lint-rc.pl
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-tools/cmd/lint-rc.pl
============================================================================
$ cvs diff -u -r1.8 -r1.9 lint-rc.pl
--- openpkg-tools/cmd/lint-rc.pl 25 Aug 2006 19:28:34 -0000 1.8
+++ openpkg-tools/cmd/lint-rc.pl 14 Nov 2006 13:48:28 -0000 1.9
@@ -34,8 +34,8 @@
my $ctx = new OpenPKG::Ctx;
# program information
-my $progname = "rclint";
-my $progvers = "0.0.2";
+my $progname = "lint-rc";
+my $progvers = "1.0.0";
# parameters (defaults)
my $version = 0;
@@ -442,13 +442,13 @@
# check rcService short circuit
if ($section !~ m/^%(config|common|info)$/) {
$done = $outer_done; $this = ''; $todo = $outer_this;
- if ( $todo !~ m/^[^\n]+\n rcService $pkgu 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]
