@@ -310,8 +310,8 @@ listViewWithKey' vals mkChild = do
310310 let placeholder = case Map.lookupGT k curState of
311311 Nothing -> endPlaceholder
312312 Just (_, ((_, (start, _)), _)) -> start
313− Just p <- liftIO $ nodeGetParentNode placeholder
314− _ <- liftIO $ nodeInsertBefore p (Just df) (Just placeholder)
313+ mp <- liftIO $ nodeGetParentNode placeholder
314+ forM_ mp $ \p -> liftIO $ nodeInsertBefore p (Just df) (Just placeholder) --TODO: Should this really be ignored if mp is Nothing, or should we ensure that mp is never Nothing
315315 return $ Just s
316316 These state _ -> do
317317 return $ Just state