diff --git a/CHANGELOG.md b/CHANGELOG.md index b306e53..ce31436 100644 --- a/CHANGELOG.md +++ b/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: diff --git a/src/Web/HTML/Navigator.js b/src/Web/HTML/Navigator.js index 474d9e3..d03fc12 100644 --- a/src/Web/HTML/Navigator.js +++ b/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; }; -}; \ No newline at end of file +}; diff --git a/src/Web/HTML/Navigator.purs b/src/Web/HTML/Navigator.purs index 3ecb00b..f2f2452 100644 --- a/src/Web/HTML/Navigator.purs +++ b/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 \ No newline at end of file +foreign import userAgent :: Navigator -> Effect String