@@ -0,0 +1,44 @@
1+module Tests.TextWrapping exposing (main, view)
2+
3+import Html
4+import Testable
5+import Testable.Element exposing (..)
6+import Testable.Element.Background as Background
7+import Testable.Element.Font as Font
8+import Testable.Generator
9+import Testable.Runner
10+import Tests.Palette as Palette exposing (..)
11+
12+
13+box attrs =
14+ el
15+ ([ width (px 50)
16+ , height (px 50)
17+ , Background.color blue
18+ ]
19+ ++ attrs
20+ )
21+ none
22+
23+
24+{-| -}
25+main : Html.Html msg
26+main =
27+ Testable.Runner.show view
28+
29+
30+view =
31+ column [ paddingXY 0 100, spacing 16 ]
32+ [ paragraph []
33+ [ text Testable.Generator.lorem
34+ ]
35+ , paragraph []
36+ [ text Testable.Generator.lorem
37+ , text Testable.Generator.lorem
38+ ]
39+ , paragraph []
40+ [ text Testable.Generator.lorem
41+ , paragraph []
42+ [ text Testable.Generator.lorem ]
43+ ]
44+ ]