Extract view function

Remove the logic from `main` and into a `view` function that handles turning a list of values into an Html list.
JoelQ · Jul 3, 2017 · 17b1dc8 · 17b1dc8
1 parent 460e348
commit 17b1dc8
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/Main.elm b/Main.elm
@@ -4,7 +4,7 @@ import Html exposing (..)
 
 
 main =
-    ul [] (List.map dropdownItem fruits)
+    view fruits
 
 
 fruits : List String
@@ -17,6 +17,11 @@ fruits =
     ]
 
 
+view : List String -> Html a
+view values =
+    ul [] (List.map dropdownItem values)
+
+
 dropdownItem : String -> Html a
 dropdownItem value =
     li [] [ text value ]