projects
/
euphorik.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
MOD maj du README principal
[euphorik.git]
/
modules
/
erl
/
euphorik_minichat_conversation.erl
diff --git
a/modules/erl/euphorik_minichat_conversation.erl
b/modules/erl/euphorik_minichat_conversation.erl
index
60f92e4
..
e46ca91
100755
(executable)
--- a/
modules/erl/euphorik_minichat_conversation.erl
+++ b/
modules/erl/euphorik_minichat_conversation.erl
@@
-44,7
+44,7
@@
% Message est le message de type #minichat et Parents une liste d'Id.
% Plus est un bool. Si Plus vaut true alors il y a encore des messages.
% Si il n'y a pas de nouveaux message alors vide est renvoyé.
% Message est le message de type #minichat et Parents une liste d'Id.
% Plus est un bool. Si Plus vaut true alors il y a encore des messages.
% Si il n'y a pas de nouveaux message alors vide est renvoyé.
-% Chaque racine est un tuple {
N
, P, D}
+% Chaque racine est un tuple {
R
, P, D}
% N : le nombre de message
% D : le dernier message connu, 0 si aucun
% P : la page souhaité, la premier est la 1
% N : le nombre de message
% D : le dernier message connu, 0 si aucun
% P : la page souhaité, la premier est la 1
@@
-84,7
+84,7
@@
mise_en_forme_conversation(Messages) ->
fun() ->
lists:foldr(
fun(Id, Acc) ->
fun() ->
lists:foldr(
fun(Id, Acc) ->
- case euphorik_bd:message_by_id
_sans_transaction
(Id) of
+ case euphorik_bd:message_by_id(Id) of
{ok, Message} ->
[{Message, parents(Id)} | Acc];
_ ->
{ok, Message} ->
[{Message, parents(Id)} | Acc];
_ ->