Design

src/GenerateurH5P.elm

@@ -241,12 +241,32 @@ source =
 
 
 {-
-   ██╗  ██╗███████╗██████╗
-   ██║  ██║██╔════╝██╔══██╗
-   ███████║███████╗██████╔╝
-   ██╔══██║╚════██║██╔═══╝
-   ██║  ██║███████║██║
-   ╚═╝  ╚═╝╚══════╝╚═╝
+    .--..--..--..--..--..--..--..--..--..--..--..--..--..--..--..--.
+   / .. \.. \.. \.. \.. \.. \.. \.. \.. \.. \.. \.. \.. \.. \.. \.. \
+   \ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/ /
+    \/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /
+    / /\/ /`' /`' /`' /`' /`' /`' /`' /`' /`' /`' /`' /`' /`' /\/ /\
+   / /\ \/`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'\ \/\ \
+   \ \/\ \                                                    /\ \/ /
+    \/ /\ \              ██╗  ██╗███████╗██████╗             / /\/ /
+    / /\/ /              ██║  ██║██╔════╝██╔══██╗            \ \/ /\
+   / /\ \/               ███████║███████╗██████╔╝             \ \/\ \
+   \ \/\ \               ██╔══██║╚════██║██╔═══╝              /\ \/ /
+    \/ /\ \              ██║  ██║███████║██║                 / /\/ /
+    / /\/ /              ╚═╝  ╚═╝╚══════╝╚═╝                 \ \/ /\
+   / /\ \/                                                    \ \/\ \
+   \ \/\ \.--..--..--..--..--..--..--..--..--..--..--..--..--./\ \/ /
+    \/ /\/ ../ ../ ../ ../ ../ ../ ../ ../ ../ ../ ../ ../ ../ /\/ /
+    / /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\/ /\
+   / /\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \/\ \
+   \ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `'\ `' /
+    `--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'`--'
+
+
+
+
+
+
 -}
 
 
@@ -1413,6 +1433,10 @@ withStartScreenSubtitle string record =
     { record | startScreenSubtitle = string }
 
 
+withContent cntnt record =
+    { record | content = List.append record.content cntnt }
+
+
 
 {-
     .--..--..--..--..--..--..--..--..--..--..--..--..--..--..--..--.