* scripts/install-info.pl: Exit if the lock file already exists.

	This change was lost when doing the i18n of the scripts.

ChangeLog

@@ -1,3 +1,8 @@
+2006-05-25  Guillem Jover  <guillem@debian.org>
+
+	* scripts/install-info.pl: Exit if the lock file already exists.
+	This change was lost when doing the i18n of the scripts.
+
 2006-05-25  Ben Pfaff  <blp@cs.stanford.edu>
 
 	* scripts/install-info.pl: Use %! instead if $! to check for EEXIST.

scripts/install-info.pl

@@ -307,6 +307,7 @@ if (!$nowrite && !link($dirfile, "$dirfile.lock")) {
 	    $name, $! );
     printf( STDERR _g("try deleting %s?")."\n", "$dirfile.lock")
 	if $!{EEXIST};
+    exit 1;
 }
 
 open(OLD,$dirfile) || &ulquit(sprintf(_g("open %s: %s"), $dirfile, $!));