From: Greg Burri <greg.burri@gmail.com>
Date: Thu, 16 Jul 2009 17:51:48 +0000 (+0000)
Subject: FIX random:uniform accept only integer (float previously).
X-Git-Tag: 1.1.6~1
X-Git-Url: http://git.euphorik.ch/index.cgi?a=commitdiff_plain;h=afc7c6e84fac05e989a208f72538e6a55daa758f;p=euphorik.git

FIX random:uniform accept only integer (float previously).
---

diff --git a/VERSION b/VERSION
index 314c3d7..ab67981 100644
--- a/VERSION
+++ b/VERSION
@@ -1 +1 @@
-1.1.5
\ No newline at end of file
+1.1.6
\ No newline at end of file
diff --git a/modules/erl/euphorik_protocole.erl b/modules/erl/euphorik_protocole.erl
index a61d0c8..947a18b 100755
--- a/modules/erl/euphorik_protocole.erl
+++ b/modules/erl/euphorik_protocole.erl
@@ -103,7 +103,7 @@ loginUser(User, IP) ->
 generer_cookie() ->
    {A1, A2, A3} = now(),
    random:seed(A1, A2, A3),
-   erlang:integer_to_list(random:uniform(math:pow(10, 32)), 36).
+   erlang:integer_to_list(random:uniform(trunc(math:pow(10, 32))), 36).
 
 
 % Modification du profile.