Change implementation of misc:unique_timestamp()

diff --git a/src/misc.erl b/src/misc.erl
index c646ed4423b313bdbd22831d8497f03299de1c30..73d05ff24fa112583336d44156bf24e5a3d17cc0 100644 (file)
--- a/src/misc.erl
+++ b/src/misc.erl
@@ -483,6 +483,5 @@ get_dir(Type) ->
 %% Generates erlang:timestamp() that is guaranteed to unique
 -spec unique_timestamp() -> erlang:timestamp().
 unique_timestamp() ->
-    Time = erlang:system_time(microsecond),
-    UI = erlang:unique_integer([positive, monotonic]),
-    usec_to_now(Time + UI).
+    {MS, S, _} = erlang:timestamp(),
+    {MS, S, erlang:unique_integer([positive, monotonic]) rem 1000000}.