X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_minichat_conversation.erl;h=eb154ee6bbe329a46581d07150866011d38c523a;hp=d264bccd4a26aceddd92fcb3b67dc1ed1cff2e18;hb=2faefc542de20cfcc0220b5c7fd7982dd0fbbfd4;hpb=3f3371f52e6d1e513011dd02a3679a079aa2253d

diff --git a/modules/erl/euphorik_minichat_conversation.erl b/modules/erl/euphorik_minichat_conversation.erl
index d264bcc..eb154ee 100755
--- a/modules/erl/euphorik_minichat_conversation.erl
+++ b/modules/erl/euphorik_minichat_conversation.erl
@@ -13,6 +13,8 @@
    conversations/4
 ]).
 
+-compile(export_all).
+
 -include("euphorik_bd.hrl").
 -include_lib("stdlib/include/qlc.hrl").
 
@@ -222,7 +224,7 @@ conversation(Messages, [M | Reste], X) ->
    true ->
       Enfants = enfants(M),
       Parents = parents(M),
-      % un message est dit exiterne si un de ses parent ne fait pas partie de la conversation ou si un de ses parents fait partie de X
+      % un message est dit externe si un de ses parent ne fait pas partie de la conversation ou si un de ses parents fait partie de X
       Est_message_externe =  Parents -- Messages =/= [] orelse intersection(Parents, X) =/= [],
       conversation([M | Messages], Reste ++ Enfants, if Est_message_externe -> [M | X]; true -> X end)
    end;