Fix cleanup of .dpkg-devert.tmp files.

ChangeLog

@@ -1,3 +1,7 @@
+Mon May 28 19:02:52 CDT 2001 Adam Heath <doogie@debian.org>
+
+  * scripts/dpkg-divert.pl: Fix cleanup of .dpkg-devert.tmp files.
+
 Mon May 28 16:40:19 CDT 2001 Adam Heath <doogie@debian.org>
 
   * po/it.po: Updated.

scripts/dpkg-divert.pl

@@ -222,10 +222,10 @@ sub checkrename {
     foreach $file ($rsrc,$rdest) {
 	open (TMP, ">> ${file}.dpkg-devert.tmp") || $! == ENOENT ||
 		&quit("error checking \`$file': $!");
-	close TMP;
-	if ($! == ENOENT) {
+	if ($!) {
 		$dorename = !$dorename;
 	} else {
+		close TMP;
 		unlink ("${file}.dpkg-devert.tmp");
 	}
     }