Add window.close()

CHANGELOG.md

@@ -7,6 +7,7 @@ Notable changes to this project are documented in this file. The format is based
 Breaking changes:
 
 New features:
+- Added `close` function for `Window` (#78 by @jmp-0x7C0)
 
 Bugfixes:
 

src/Web/HTML/Window.js

@@ -82,6 +82,12 @@ export function _open(url) {
   };
 }
 
+export function close(window) {
+  return function () {
+    return window.close();
+  };
+}
+
 export function outerHeight(window) {
   return function () {
     return window.outerHeight;

src/Web/HTML/Window.purs

@@ -13,6 +13,7 @@ module Web.HTML.Window
   , moveBy
   , moveTo
   , open
+  , close
   , outerHeight
   , outerWidth
   , print
@@ -89,6 +90,8 @@ foreign import _open
   -> Window
   -> Effect (Nullable Window)
 
+foreign import close :: Window -> Effect Unit
+
 foreign import outerHeight :: Window -> Effect Int
 
 foreign import outerWidth :: Window -> Effect Int