diff --git a/src/testCase/utTpfm.erl b/src/testCase/utTpfm.erl
index dea77bd..017b23c 100644
--- a/src/testCase/utTpfm.erl
+++ b/src/testCase/utTpfm.erl
@@ -679,14 +679,4 @@ delL(L1, L2) ->
    L1 -- L2.
 
 delM(M1, M2) ->
-   doDelM(maps:iterator(M2), M1).
-
-doDelM(Iterator, M1) ->
-   case maps:next(Iterator) of
-      {K, _V, none} ->
-         maps:remove(K, M1);
-      {K, _V, NextI} ->
-         doDelM(NextI, maps:remove(K, M1));
-      _ ->
-         M1
-   end.
\ No newline at end of file
+   utMapsFold:diff(M1, M2).
\ No newline at end of file