X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_common.erl;h=b016a0fd73fcf6f49cfc7f0452970c8728d6ab0a;hp=3806df35b8607cd373e5d4aed8ea8f866291f4d0;hb=4a6c575807a90370c0069b688026b10102e1ce10;hpb=217c4d7a0d5f9fee3a8ef0a05ab8506c7f39d5e5
diff --git a/modules/erl/euphorik_common.erl b/modules/erl/euphorik_common.erl
index 3806df3..b016a0f 100644
--- a/modules/erl/euphorik_common.erl
+++ b/modules/erl/euphorik_common.erl
@@ -15,12 +15,12 @@
%
% You should have received a copy of the GNU General Public License
% along with Euphorik. If not, see .
-%
-% Module avec plein de bordel utile à l'intérieur.
-% @author G.Burri
+%
+% Module with some useful stuffs.
-module(euphorik_common).
+-author("Greg Burri ").
-export([
ceiling/1,
delta_date_ms/2,
@@ -40,7 +40,7 @@ ceiling(X) ->
Pos when Pos > 0 -> T + 1;
_ -> T
end.
-
+
% Retourne la difference entre deux timestamp (erlang:now()) en miliseconde
delta_date_ms(D1, D2) ->
@@ -50,14 +50,14 @@ delta_date_ms(D1, D2) ->
% Retourne la différence entre deux timestamp (erlang:now) en minutes
delta_date_minute(D1, D2) ->
trunc(delta_date_ms(D1, D2) / 1000 / 60).
-
+
serialize_ip(undefined) ->
"";
serialize_ip(IP) ->
lists:flatten(io_lib:format("~w.~w.~w.~w", tuple_to_list(IP))).
-
-
+
+
unserialize_ip(IP) ->
case io_lib:fread("~d.~d.~d.~d", IP) of
{ok, [A, B, C, D], []} -> {A, B, C, D};