[Pkg-sysvinit-commits] r1672 - sysvinit/trunk/debian/sysv-rc/sbin

[Kel Modderman]

Author: kelmo-guest
Date: 2009-08-31 15:20:35 +0000 (Mon, 31 Aug 2009)
New Revision: 1672

Modified:
   sysvinit/trunk/debian/sysv-rc/sbin/update-rc.d
Log:
Fix perl warning about undefined variable and improve info output.

Modified: sysvinit/trunk/debian/sysv-rc/sbin/update-rc.d
===================================================================
--- sysvinit/trunk/debian/sysv-rc/sbin/update-rc.d	2009-08-31 15:11:26 UTC (rev 1671)
+++ sysvinit/trunk/debian/sysv-rc/sbin/update-rc.d	2009-08-31 15:20:35 UTC (rev 1672)
@@ -470,7 +470,9 @@
     @lsb_stop_lvls  = @$lsb_stop_ref;
     return if (!@lsb_start_lvls and !@lsb_stop_lvls);
 
-    shift if ($_[0] ne 'start' and $_[0] ne 'stop' and $_[0] ne 'defaults');
+    if (defined $_[0]) {
+        shift if ($_[0] !~ /^(start|stop|defaults)$/);
+    }
 
     if ($act eq 'defaults') {
         @arg_start_lvls = (2, 3, 4, 5);
@@ -513,7 +515,7 @@
                 "LSB Default-Stop values ($lsb_str)";
     }
 
-    info "\`$act @_' overridden by LSB info of $lsb_header" if $differ;
+    info "arguments \`$act @_' overridden by LSB info of $lsb_header" if $differ;
 }
 
 sub insserv_toggle {