[project @ 2005-07-19 10:59:26 by cjwatson]

allow -done on a closed bug if it comes with a version

diff --git a/scripts/process.in b/scripts/process.in
index 6d83dc5ac167201a7d2f9d7e9e328ba0813a1d9a..b58cb6629570a7da8344f17d21159d8ec17bfb8b 100755 (executable)
--- a/scripts/process.in
+++ b/scripts/process.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: process.in,v 1.93 2005/07/17 16:06:26 cjwatson Exp $
+# $Id: process.in,v 1.94 2005/07/19 10:59:26 cjwatson Exp $
 #
 # Usage: process nn
 # Temps:  incoming/Pnn
@@ -264,7 +264,12 @@ if ($codeletter eq 'D' || $codeletter eq 'F')
            $generalcc=''; 
         }
     } else {
-       (&appendlog,&finish) if length($data->{done});
+        if (length($data->{done}) and
+                not defined $pheader{'source-version'} and
+                not defined $pheader{'version'}) {
+            &appendlog;
+            &finish;
+        }
         $receivedat= "done\@$gEmailDomain";
         $markaswhat= 'done';
         $set_done= $header{'from'};