diff --git a/src/GenerateurH5P.elm b/src/GenerateurH5P.elm
index 7f2f429..0275480 100644
--- a/src/GenerateurH5P.elm
+++ b/src/GenerateurH5P.elm
@@ -1602,11 +1602,7 @@ branchingScenarioParserHelp profondeur ( contentList, contentId ) =
           succeed f
             |= contentParser profondeur contentId
             |. blankLines
-
-        -- Je me demande pourquoi on ne se contente pas d'écrire :
-        -- succeed (Done contentList)
-        , succeed ()
-            |> P.map (\_ -> Done contentList)
+        , succeed (Done contentList)
         ]