OnMoved.purs 434 B

12345678910111213141516
  1. module Browser.Tabs.OnMoved (addListener, removeListener, MoveInfo) where
  2. import Browser.Tabs (TabId, WindowId)
  3. import Browser.Utils (Listener2)
  4. import Data.Unit (Unit)
  5. import Effect (Effect)
  6. type MoveInfo
  7. = { windowId :: WindowId
  8. , fromIndex :: Int
  9. , toIndex :: Int
  10. }
  11. foreign import addListener :: (Listener2 TabId MoveInfo) -> Effect Unit
  12. foreign import removeListener :: (Listener2 TabId MoveInfo) -> Effect Unit