[project @ 2003-07-15 09:40:00 by cjwatson]

[debbugs.git] / Debbugs / Versions.pm

diff --git a/Debbugs/Versions.pm b/Debbugs/Versions.pm
index 947156186d56c91f20fef4e6836c91bde5438d30..3da63ce2be86824e63b915b1a4268011ee88f742 100644 (file)
--- a/Debbugs/Versions.pm
+++ b/Debbugs/Versions.pm
@@ -115,7 +115,7 @@ sub merge ($@)
     }
     # Insert undef for the last version so that we can tell a known version
     # by seeing if it exists in $self->{parent}.
-    $self->{parent}{$_[$#_]} = undef;
+    $self->{parent}{$_[$#_]} = undef unless exists $self->{parent}{$_[$#_]};
 }
 
 =item load