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: 17-Jul-2003 11:48:43 Branch: HEAD Handle: 2003071710484200 Modified files: openpkg-re rclint.pl Log: temporary disable opServiceEnabled check Summary: Revision Changes Path 1.12 +4 -0 openpkg-re/rclint.pl ____________________________________________________________________________ patch -p0 <<'@@ .' Index: openpkg-re/rclint.pl ============================================================================ $ cvs diff -u -r1.11 -r1.12 rclint.pl --- openpkg-re/rclint.pl 15 Jul 2003 08:42:22 -0000 1.11 +++ openpkg-re/rclint.pl 17 Jul 2003 09:48:42 -0000 1.12 @@ -418,6 +418,7 @@ # check env if ($section =~ m/^%(env)$/) { + if (0) { #FIXME temporary disabled while migrating from opServiceEnabled to opService enable # check opServiceEnabled short circuit $done = $outer_done; $this = ''; $todo = $outer_this; if ( $todo =~ m/^[^\n]+\n opServiceEnabled \w+ \|\| exit 0\n/s ) { @@ -436,6 +437,7 @@ &lint_warning($file, $done, $this, "section $section: if ... opServiceEnabled referencing wrong package"); } } + } # exit not allowed here; lousy test ... $done = $outer_done; $this = ''; $todo = $outer_this; @@ -448,6 +450,7 @@ # skip return if ($section =~ m/^%(info|common)$/); + if (0) { #FIXME temporary disabled while migrating from opServiceEnabled to opService enable # check obsolete if ... opServiceEnabled construct $done = $outer_done; $this = ''; $todo = $outer_this; if ( $todo =~ m/^[^\n]+\n\s+if\s+opServiceEnabled\s+.+then/s ) { @@ -465,6 +468,7 @@ if ( $todo !~ m/\sopServiceEnabled\s$pkgu\s+/s ) { &lint_warning($file, $done, $this, "section $section: opServiceEnabled referencing wrong package"); } + } } # check shell redirections @@ . ______________________________________________________________________ The OpenPKG Project www.openpkg.org CVS Repository Commit List [EMAIL PROTECTED]