Dragging not triggered on mobile devices

[decapo01]

When switching to a mobile device the slider fails to work.

I have an example on ellie
https://ellie-app.com/bWV3GtbNgPpa1

If you switch your browser to mobile then you'll see you cannot use the slider.

I tried this but it didnt work

onMouseDown : (Drag -> RangeDrag) -> Attribute Msg
onMouseDown createRangeDrag =
    let
        _ = Debug.log "moused" "moused"
    in
        Html.Styled.Events.on "mousedown" <| Json.Decode.map (DragStart createRangeDrag) position


onTouchDown : (Drag -> RangeDrag) -> Attribute Msg
onTouchDown createRangeDrag =
    let
        _  = Debug.log "touched" "this has been touched"
    in
        Html.Styled.Events.on "touchstart" <| Json.Decode.map (DragStart createRangeDrag) position

and

        handle value dragCmd =
            span [ onMouseDown dragCmd, onTouchDown dragCmd, css [ Css.position Css.absolute, positionFromValue value, handleTop ], class (cssNamespace ++ "handle") ] []

however in a regular browser mode both events are fired

[stephenreddek]

Thank you for the issue! I don't know anything about mobile browser/touch events so I'll have to start from square 1. If you have any other ideas for where to look (its good to know touchstart isn't the answer), that will help.

[stephenreddek]

Quick Update: I've made some progress on this front, but it still doesn't work quite right. I've been able to get partial results by using touchstart, touchmove, and touchend. They all need to be hooked up for it to work at all. Elm doesn't support touch events on the document without using a port (which packages can't use), so I've been trying to get it to work with the events set on the handles. There is some funkiness still.