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:   20-Jul-2003 22:38:09
  Branch: HEAD                             Handle: 2003072021380800

  Modified files:
    openpkg-re              rclint.pl

  Log:
    correctly lint opXXXX replacment with rcXXXX (PR#207)

  Summary:
    Revision    Changes     Path
    1.14        +7  -7      openpkg-re/rclint.pl
  ____________________________________________________________________________

  patch -p0 <<'@@ .'
  Index: openpkg-re/rclint.pl
  ============================================================================
  $ cvs diff -u -r1.13 -r1.14 rclint.pl
  --- openpkg-re/rclint.pl      17 Jul 2003 21:38:43 -0000      1.13
  +++ openpkg-re/rclint.pl      20 Jul 2003 20:38:08 -0000      1.14
  @@ -426,16 +426,16 @@
           return;
       }
   
  -    #   check opService short circuit
  +    #   check rcService short circuit
       $done = $outer_done; $this = ''; $todo = $outer_this;
  -    if ( $todo !~ m/^[^\n]+\n    opService \w+ enable yes \|\| exit 0\n/s ) {
  -        &lint_warning($file, $done, $this, "section $section: \"opService ... 
enable yes\" short circuit missing");
  +    if ( $todo !~ m/^[^\n]+\n    rcService \w+ enable yes \|\| exit 0\n/s ) {
  +        &lint_warning($file, $done, $this, "section $section: \"rcService ... 
enable yes\" short circuit missing");
       }
       else {
  -        #   check opService package reference
  +        #   check rcService package reference
           $done = $outer_done; $this = ''; $todo = $outer_this;
  -        if ( $todo !~ m/\bopService\s+$pkgu\s+/s ) {
  -            &lint_warning($file, $done, $this, "section $section: opService 
referencing wrong package");
  +        if ( $todo !~ m/\brcService\s+$pkgu\s+/s ) {
  +            &lint_warning($file, $done, $this, "section $section: rcService 
referencing wrong package");
           }
       }
   
  @@ -462,7 +462,7 @@
       my $done = ''; my $this = ''; my $todo = $spec;
       while ($todo =~ m/\bopServiceEnabled\b/s) {
           $done .= $`; $this = $&; $todo = $';
  -        &lint_warning($file, $done, $this, "deprecated usage of opServiceEnabled 
macro (expected opService ... enable yes)");
  +        &lint_warning($file, $done, $this, "deprecated usage of opServiceEnabled 
macro (expected rcService ... enable yes)");
           $done .= $this;
       }
   }
  @@ .
______________________________________________________________________
The OpenPKG Project                                    www.openpkg.org
CVS Repository Commit List                     [EMAIL PROTECTED]

Reply via email to