Skip to content
This repository was archived by the owner on Oct 4, 2020. It is now read-only.
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
12 changes: 12 additions & 0 deletions src/DOM/HTML/Window.js
Original file line number Diff line number Diff line change
Expand Up @@ -20,3 +20,15 @@ exports.location = function (window) {
return window.location;
};
};

exports.innerWidth = function (window) {
return function () {
return window.innerWidth;
};
};

exports.innerHeight = function (window) {
return function () {
return window.innerHeight;
};
};
4 changes: 4 additions & 0 deletions src/DOM/HTML/Window.purs
Original file line number Diff line number Diff line change
Expand Up @@ -10,3 +10,7 @@ foreign import document :: forall eff. Window -> Eff (dom :: DOM | eff) HTMLDocu
foreign import navigator :: forall eff. Window -> Eff (dom :: DOM | eff) Navigator

foreign import location :: forall eff. Window -> Eff (dom :: DOM | eff) Location

foreign import innerWidth :: forall eff. Window -> Eff (dom :: DOM | eff) Int

foreign import innerHeight :: forall eff. Window -> Eff (dom :: DOM | eff) Int