Skip to content

Commit c339925

Browse files
committed
Add support for navigator language and userAgent
1 parent 69b7a44 commit c339925

File tree

2 files changed

+16
-0
lines changed

2 files changed

+16
-0
lines changed

src/Web/HTML/Navigator.js

Lines changed: 12 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,19 @@
11
"use strict";
22

3+
exports.language = function (navigator) {
4+
return function () {
5+
return navigator.language;
6+
};
7+
};
8+
39
exports.platform = function (navigator) {
410
return function () {
511
return navigator.platform;
612
};
713
};
14+
15+
exports.userAgent = function (navigator) {
16+
return function () {
17+
return navigator.userAgent;
18+
};
19+
};

src/Web/HTML/Navigator.purs

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -4,4 +4,8 @@ import Effect (Effect)
44

55
foreign import data Navigator :: Type
66

7+
foreign import language :: Navigator -> Effect String
8+
79
foreign import platform :: Navigator -> Effect String
10+
11+
foreign import userAgent :: Navigator -> Effect String

0 commit comments

Comments
 (0)