FIX minimodifs

diff --git a/doc/TODO.txt b/doc/TODO.txt
index 42f132c..8da3fb2 100755 (executable)
--- a/doc/TODO.txt
+++ b/doc/TODO.txt
@@ -1,8 +1,8 @@
 == TODO ==\r
 \r
 === v1.0 ===\r
-* Corriger les bugs de niveau [1] et [2]\r
-* Cleaner le code (erl, js, xhtml, css) et eventuellement profiler un peu (le refresh est lent sous opera)\r
+* Cleaner le code (erl, js, xhtml, css) et eventuellement profiler un peu (le refresh est lent sous opera)
+* Pouvoir afficher les utilisateurs (print_users()) qui sont admin\r
 === v1.1 ===\r
 * Mettre un icon (genre sablier ou truc qui tourne à la apple) lorsque le chat se charge (également lors d'un changement de page par exemple)\r
    * Simuler un réseau lent\r

diff --git a/modules/erl/euphorik_bd.erl b/modules/erl/euphorik_bd.erl
index 89c9836..07455d8 100755 (executable)
--- a/modules/erl/euphorik_bd.erl
+++ b/modules/erl/euphorik_bd.erl
@@ -304,7 +304,6 @@ update_pseudo_user(UserId, Pseudo) ->
    
    
 % Affiche N user trié par leur date de dernière connexion.
-% Attention : pas d'index sur ce champs (la date)   
 print_users(N) ->
    resultat_transaction(mnesia:transaction(fun() ->
       C = cursor(
@@ -419,8 +418,6 @@ css_from_user_cookie(Cookie) ->
    end.
    
 
-
-
 user_by_login_password(Login, Password) ->
    resultat_transaction(mnesia:transaction(
       fun() ->
@@ -530,7 +527,7 @@ messages(N, P) ->
       qlc:delete_cursor(C),
       lists:reverse(R)
    end,
-   resultat_transaction(mnesia:transaction(F)).   
+   resultat_transaction(mnesia:transaction(F)).
 
 
 % Renvoie les messages manquants pour la page P en sachant qu'il y a N message

diff --git a/modules/erl/euphorik_daemon.erl b/modules/erl/euphorik_daemon.erl
index be3b39c..51f224e 100755 (executable)
--- a/modules/erl/euphorik_daemon.erl
+++ b/modules/erl/euphorik_daemon.erl
@@ -28,7 +28,9 @@
 
 
 % Démarre le démon
-start(_A) ->\r
+start(_A) ->
+   % dossier utilisé lors de gros trie par qlc, voir qlc:keysort()
+   file:set_cwd("/tmp"),\r
    loop().
    \r