- inserer_reponses(Id, Repond_A),
- mnesia:write(#minichat{id=Id, auteur_id=Auteur#user.id, date=now(), pseudo=Auteur#user.pseudo, contenu=Mess}),
+ inserer_reponses(Id, Repond_A_ids),
+ mnesia:write(#minichat{
+ id = Id,
+ auteur_id = Auteur#user.id,
+ date = now(),
+ pseudo = Auteur#user.pseudo,
+ contenu = Mess,
+ racine_id = if Racine_id =:= undefined -> Id; true -> Racine_id end
+ }),