git.iko.soy/elk
on master help sign in
cosmetic: silly indentation changes in comments
bb13c9cEvan Czaplicki
libraries/Graphics/Input.elm+5−5
compare with master
unifiedsplit
@@ -150,7 +150,7 @@ clickable = Native.Graphics.Input.clickable
150
150
151{-| Represents the current content of a text field. For example:
151{-| Represents the current content of a text field. For example:
152
152
153− FieldContent "She sells sea shells" (Selection 0 3 Backward)
153+ FieldContent "She sells sea shells" (Selection 0 3 Backward)
154
154
155This means the user highlighted the substring `"She"` backwards.
155This means the user highlighted the substring `"She"` backwards.
156-}
156-}
@@ -158,10 +158,10 @@ type FieldContent = { string:String, selection:Selection }
158
158
159{-| The selection within a text field. `start` is never greater than `end`:
159{-| The selection within a text field. `start` is never greater than `end`:
160
160
161− Selection 0 0 Forward -- cursor precedes all characters
161+ Selection 0 0 Forward -- cursor precedes all characters
162
162
163− Selection 5 9 Backward -- highlighting characters starting after
163+ Selection 5 9 Backward -- highlighting characters starting after
164− -- the 5th and ending after the 9th
164+ -- the 5th and ending after the 9th
165-}
165-}
166type Selection = { start:Int, end:Int, direction:Direction }
166type Selection = { start:Int, end:Int, direction:Direction }
167
167
@@ -170,7 +170,7 @@ data Direction = Forward | Backward
170
170
171{-| A field with no content:
171{-| A field with no content:
172
172
173− FieldContent "" (Selection 0 0 Forward)
173+ FieldContent "" (Selection 0 0 Forward)
174-}
174-}
175noContent : FieldContent
175noContent : FieldContent
176noContent = FieldContent "" (Selection 0 0 Forward)
176noContent = FieldContent "" (Selection 0 0 Forward)