old bug in mtime computation fixed

diff --git a/helm/software/components/library/librarian.ml b/helm/software/components/library/librarian.ml
index 990e74813cbcf209bb918580b18117353ec255de..32b6de48bfd6a599b905ee30820f6f5457839a90 100644 (file)
--- a/helm/software/components/library/librarian.ml
+++ b/helm/software/components/library/librarian.ml
@@ -231,7 +231,7 @@ module Make = functor (F:Format) -> struct
         | None ->
            match F.mtime_of_target_object a with
            | Some t as x -> 
-               Hashtbl.remove ct b;
+               Hashtbl.remove ct a;
                Hashtbl.add ct a x; x
            | x -> x
       with Not_found -> assert false