Add navigator.languages

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 `languages` value for `Navigator` (#59 by @toastal)
 - Added `HTMLHtmlElement` module and `documentElement` function `HTMLDocument` (#60 by @toastal)
 
 Bugfixes:

src/Web/HTML/Navigator.js

@@ -6,6 +6,12 @@ exports.language = function (navigator) {
   };
 };
 
+exports.languages = function (navigator) {
+  return function () {
+    return navigator.languages;
+  };
+};
+
 exports.platform = function (navigator) {
   return function () {
     return navigator.platform;
@@ -16,4 +22,4 @@ exports.userAgent = function (navigator) {
   return function () {
     return navigator.userAgent;
   };
-};
+};

src/Web/HTML/Navigator.purs

@@ -6,6 +6,8 @@ foreign import data Navigator :: Type
 
 foreign import language :: Navigator -> Effect String
 
+foreign import languages :: Navigator -> Effect (Array String)
+
 foreign import platform :: Navigator -> Effect String
 
-foreign import userAgent :: Navigator -> Effect String
+foreign import userAgent :: Navigator -> Effect String