diff --git a/src/Gargantext/Components/Tree.purs b/src/Gargantext/Components/Tree.purs
index 7635de4211409f445c588c78da6baf4f5bc827f5..df2de15448ede77755d91f9c6a1c1035a9cb1ba8 100644
--- a/src/Gargantext/Components/Tree.purs
+++ b/src/Gargantext/Components/Tree.purs
@@ -496,7 +496,7 @@ fileTypeView d s@(NTree (LNode {id, droppedFile: Just (DroppedFile {contents, fi
               [ H.h5 {} [H.text "Choose file type"] ]
             , H.div {className: "col-md-2"}
               [ H.a {className: "btn text-danger glyphitem glyphicon glyphicon-remove"
-                    --, onClick $ \_ -> d $ PrepareUploadFile nid contents
+                    , onClick: mkEffectFn1 $ \_ -> d $ PrepareUploadFile id contents
                     , title: "Close"} []
               ]
             ]