@@ -22,6 +22,10 @@ import Ur.Jam exposing (isSig)
2222import Ur.Run
2323import Ur.Sub
2424import Ur.Types exposing (Noun(..))
25+import Html.String
26+import List
27+import Css
28+import Html.Styled.Attributes exposing (css)
2529
2630
2731url : String
@@ -61,7 +65,6 @@ type alias SearchResult =
6165 , engines : Set String
6266 }
6367
64−
6568type Msg
6669 = Noop
6770 | GotShipName String
@@ -99,18 +102,9 @@ main =
99102 , body =
100103 [ view model
101104 |> layout
102− [ Font.family
103− [ Font.typeface "system-ui"
104− , Font.typeface "-apple-system"
105− , Font.typeface "BlinkMacSystemFont"
106− , Font.typeface "Segoe UI"
107− , Font.typeface "Roboto"
108− , Font.typeface "Helvetica"
109− , Font.typeface "Arial"
110− , Font.sansSerif
105+ [ Font.family
106+ [ Font.typeface "Inter"
111107 , Font.typeface "Apple Color Emoji"
112− , Font.typeface "Segoe UI Emoji"
113− , Font.typeface "Segoe UI Symbol"
114108 ]
115109 , clipX
116110 ]
@@ -150,19 +144,27 @@ main =
150144 }
151145
152146
147+logoView : List (Attribute Msg) -> Element Msg
148+logoView attributes =
149+ Element.image ( List.append [ Html.Attributes.id "tilt" |> htmlAttribute ] attributes )
150+ { src = "assets/img/logo.png", description = "The logo" }
151+
153152view : Model -> Element Msg
154153view model =
155154 case model.initiatedSearch of
156155 Nothing ->
157156 column [ centerX, centerY, padding 8, spacing 16 ]
158− [ el [ centerX, Font.size 67, Font.heavy ] (text "%seax")
159− , searchView model
157+ [
158+ -- el [ centerX, Font.size 67, Font.heavy] (text "%seax") ,
159+ -- Element.image [ centerX, width (px 510), height (px 161), Html.Attributes.id "tilt" |> htmlAttribute ] { src = "assets/img/logo.png", description = "The logo" },
160+ logoView [centerX, width (px 510), height (px 161) ],
161+ searchView model
160162 ]
161163
162164 Just _ ->
163165 column [ width fill, spacing 16 ]
164− [ column [ spacing 16, width (minimum 0 fill), padding 8 ]
165− [ searchView model |> el []
166+ [ column [ spacing 16, width (minimum 0 fill), padding 8]
167+ [ row [] [ logoView [height (px 40)], searchView model |> el [] ]
166168 , row [ spacing 8, paddingEach { top = 16, bottom = 16, left = 0, right = 0 } ]
167169 [ text "Sources: "
168170 , model.engines
@@ -273,7 +275,7 @@ view model =
273275searchView : { a | search : String } -> Element Msg
274276searchView model =
275277 row [ spacing 8 ]
276− [ Input.text [ width (px 250) ]
278+ [ Input.text [ Html.Attributes.class "shadow" |> htmlAttribute, width (px 400)]
277279 { onChange = UpdateSearch
278280 , placeholder = Nothing
279281 , text = model.search
@@ -283,7 +285,8 @@ searchView model =
283285 { label =
284286 text "search"
285287 |> el
286− [ Border.width 4
288+ [ Html.Attributes.class "button" |> htmlAttribute
289+ , Border.width 4
287290 , padding 4
288291 , Font.size 29
289292 , Font.bold