X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_common.erl;h=f9e3f68ccba71de8e9d019456342f496367a0999;hp=e516322f87fb07931c19287f4d626067cbbb457e;hb=808fb60f6c10dfcaccee94c6a49f768de84dc2ef;hpb=81393a74d648e4830dc8c7c562fa203f50a105f6
diff --git a/modules/erl/euphorik_common.erl b/modules/erl/euphorik_common.erl
index e516322..f9e3f68 100644
--- a/modules/erl/euphorik_common.erl
+++ b/modules/erl/euphorik_common.erl
@@ -17,10 +17,10 @@
% along with Euphorik. If not, see .
%
% Module with some useful stuffs.
-% @author G.Burri
-module(euphorik_common).
+-author("Greg Burri ").
-export([
ceiling/1,
delta_date_ms/2,
@@ -42,7 +42,7 @@ ceiling(X) ->
end.
-% Retourne la difference entre deux timestamp (erlang:now()) en miliseconde
+% Retourne la difference entre deux timestamp (erlang:timestamp()) en miliseconde
delta_date_ms(D1, D2) ->
1000000000 * abs(element(1, D1) - element(1, D2)) + 1000 * abs(element(2, D1) - element(2, D2)) + trunc(abs(element(3, D1) - element(3, D2)) / 1000).