merge bug23948 into default

1 files changed, 6 insertions, 5 deletions

diff --git a/src/file_handle_cache.erl b/src/file_handle_cache.erl
index b26bb9884b..4f0365718f 100644
--- a/src/file_handle_cache.erl
+++ b/src/file_handle_cache.erl
@@ -1149,11 +1149,12 @@ notify_age(CStates, AverageAge) ->
       end, CStates).
 
 notify_age0(Clients, CStates, Required) ->
-    Notifications =
-        [CState || CState <- CStates, CState#cstate.callback =/= undefined],
-    {L1, L2} = lists:split(random:uniform(length(Notifications)),
-                           Notifications),
-    notify(Clients, Required, L2 ++ L1).
+    case [CState || CState <- CStates, CState#cstate.callback =/= undefined] of
+        []            -> ok;
+        Notifications -> S = random:uniform(length(Notifications)),
+                         {L1, L2} = lists:split(S, Notifications),
+                         notify(Clients, Required, L2 ++ L1)
+    end.
 
 notify(_Clients, _Required, []) ->
     ok;