fix: visibility
This commit is contained in:
parent
33c0299bb8
commit
5db9c3e5b0
@ -1,4 +1,15 @@
|
||||
module Puppeteer.Mouse where
|
||||
module Puppeteer.Mouse
|
||||
( MouseButton(..)
|
||||
, scroll
|
||||
, down
|
||||
, up
|
||||
, moveTo
|
||||
, click
|
||||
, MouseWheelOptions
|
||||
, MouseMoveOptions
|
||||
, MouseOptions
|
||||
, MouseClickOptions
|
||||
) where
|
||||
|
||||
import Prelude
|
||||
|
||||
@ -47,9 +58,7 @@ down btn mouse = Promise.toAffE $ downImpl mouse (mouseButtonToString btn)
|
||||
up :: MouseButton -> Mouse -> Aff Unit
|
||||
up btn mouse = Promise.toAffE $ upImpl mouse (mouseButtonToString btn)
|
||||
|
||||
moveTo
|
||||
:: forall options missing fullU
|
||||
. Nub fullU (MouseMoveOptions ())
|
||||
moveTo :: forall options missing fullU. Nub fullU (MouseMoveOptions ())
|
||||
=> Union options missing (MouseMoveOptions ())
|
||||
=> Union options (MouseMoveOptions ()) fullU
|
||||
=> Record options
|
||||
@ -60,9 +69,7 @@ moveTo opts mouse xy = Promise.toAffE
|
||||
$ moveImpl mouse xy
|
||||
$ Record.merge opts {steps: 1.0}
|
||||
|
||||
click
|
||||
:: forall options missing fullU
|
||||
. Nub fullU (MouseClickOptions ())
|
||||
click :: forall options missing fullU. Nub fullU (MouseClickOptions ())
|
||||
=> Union options missing (MouseClickOptions ())
|
||||
=> Union options (MouseClickOptions ()) fullU
|
||||
=> Record options
|
||||
|
Loading…
Reference in New Issue
Block a user