[Initscripts-ng-commits] r455 - in /trunk/src/insserv/debian: changelog check-initd-order

[pere at users.alioth.debian.org]

Author: pere
Date: Sun Jan  6 13:41:43 2008
New Revision: 455

URL: http://svn.debian.org/wsvn/initscripts-ng/?sc=1&rev=455
Log:
  * In graphs, name scripts without provides header, and scripts
    without LSB header, using the name of the file in /etc/init.d/.
    This make it easier to spot loops involving these scripts.

Modified:
    trunk/src/insserv/debian/changelog
    trunk/src/insserv/debian/check-initd-order

Modified: trunk/src/insserv/debian/changelog
URL: http://svn.debian.org/wsvn/initscripts-ng/trunk/src/insserv/debian/changelog?rev=455&op=diff
==============================================================================
--- trunk/src/insserv/debian/changelog (original)
+++ trunk/src/insserv/debian/changelog Sun Jan  6 13:41:43 2008
@@ -6,6 +6,9 @@
     /tmp/ is always mounted before the scripts needing is started.
     Conflict with initscripts before 2.86.ds1-48, to avoid a
     dependency loop with this change.
+  * In graphs, name scripts without provides header, and scripts
+    without LSB header, using the name of the file in /etc/init.d/.
+    This make it easier to spot loops involving these scripts.
 
  -- Petter Reinholdtsen <pere at debian.org>  Sun,  6 Jan 2008 11:07:24 +0100
 

Modified: trunk/src/insserv/debian/check-initd-order
URL: http://svn.debian.org/wsvn/initscripts-ng/trunk/src/insserv/debian/check-initd-order?rev=455&op=diff
==============================================================================
--- trunk/src/insserv/debian/check-initd-order (original)
+++ trunk/src/insserv/debian/check-initd-order Sun Jan  6 13:41:43 2008
@@ -100,6 +100,7 @@
     unless ($lsbinfo{'provides'}) {
         print STDERR "error: File ". $lsbinfo{'file'} . " is missing the provides header\n";
         $lsbinfo{'provides'} = $lsbinfo{'file'};
+        $lsbinfo{'provides'} =~ s/^[SK]\d{2}//;
     }
 
     my $key = $opts{'k'} ? 'stop' : 'start';
@@ -166,6 +167,7 @@
 
             unless (defined $lsbinforef) {
                 print STDERR "warning: LSB header missing in $rcbase/$rcdir/$script\n";
+                $script =~ s/^[SK]\d{2}//;
                 $lsbinforef = {'provides'       => $script,
                                'required-start' => '$remote_fs $syslog',
                                'required-stop'  => '$remote_fs $syslog'};