--- update-rc.d.orig	2009-01-16 01:08:11.000000000 +0100
+++ update-rc.d	2009-01-16 01:07:53.000000000 +0100
@@ -219,6 +219,8 @@
 
 	shift @ARGV; shift @ARGV;
 	$level = shift @ARGV;
+	&usage("action with list of runlevels not terminated by \".\"")
+		if ($ARGV[$#ARGV] ne '.');
 	do {
 	    if ($level !~ m/^[0-9S]$/) {
 		&usage(
@@ -233,8 +235,6 @@
 	    $startlinks[$level] = "$letter$NN" if ($letter eq 'S');
 	    $stoplinks[$level]  = "$letter$NN" if ($letter eq 'K');
 	} while (($level = shift @ARGV) ne '.');
-	&usage("action with list of runlevels not terminated by \`.'")
-	    if ($level ne '.');
     }
     1;
 }