Bump part3 and part4

2018-08-13 06:15:44 -04:00
parent 5d27ab52a7
commit 3002567065
58 changed files with 260 additions and 260 deletions
--- a/advanced/part3/src/Article/Body.elm
+++ b/advanced/part3/src/Article/Body.elm
@@ -1,38 +0,0 @@
-module Article.Body exposing (Body, MarkdownString, decoder, toHtml, toMarkdownString)
-
-import Html exposing (Attribute, Html)
-import Json.Decode as Decode exposing (Decoder)
-import Markdown
-
-
-
-- TYPES
-
-
-type Body
-    = Body MarkdownString
-
-
-{-| Internal use only. I want to remind myself that the string inside Body contains markdown.
-}
-type alias MarkdownString =
-    String
-
-
-
-- CONVERSIONS
-
-
-toHtml : Body -> List (Attribute msg) -> Html msg
-toHtml (Body markdown) attributes =
-    Markdown.toHtml attributes markdown
-
-
-toMarkdownString : Body -> MarkdownString
-toMarkdownString (Body markdown) =
-    markdown
-
-
-decoder : Decoder Body
-decoder =
-    Decode.map Body Decode.string