6 lines
125 B
Elm
6 lines
125 B
Elm
|
|
module Clicks where
|
|
import WebSocket
|
|
msgs = show <~ count Mouse.clicks
|
|
main = asText <~ open "ws://localhost:8080/ws" msgs
|
|
|