File tree Expand file tree Collapse file tree 2 files changed +4
-4
lines changed Expand file tree Collapse file tree 2 files changed +4
-4
lines changed Original file line number Diff line number Diff line change 24
24
" output"
25
25
],
26
26
"dependencies" : {
27
- "purescript-crypto" : " ^2.0.0 " ,
27
+ "purescript-crypto" : " ^2.0.1 " ,
28
28
"purescript-simple-json" : " ^7.0.0" ,
29
29
"purescript-strings" : " ^4.0.1"
30
30
},
Original file line number Diff line number Diff line change @@ -17,7 +17,7 @@ import Data.String.Regex (replace)
17
17
import Data.String.Regex.Flags (global )
18
18
import Data.String.Regex.Unsafe (unsafeRegex )
19
19
import Effect (Effect )
20
- import Node.Buffer (fromString , toString )
20
+ import Node.Buffer (Buffer , fromString , toString )
21
21
import Node.Crypto.Hash as Hash
22
22
import Node.Crypto.Hmac as Hmac
23
23
import Node.Encoding (Encoding (..))
@@ -103,7 +103,7 @@ algorithmFromString alg
103
103
104
104
base64URLDecode :: String -> Effect String
105
105
base64URLDecode x =
106
- fromString (unescape x) Base64 >>= toString UTF8
106
+ ( fromString (unescape x) Base64 :: Effect Buffer ) >>= toString UTF8
107
107
108
108
unescape :: String -> String
109
109
unescape x =
@@ -128,7 +128,7 @@ sign secret alg input =
128
128
129
129
base64URLEncode :: String -> Effect String
130
130
base64URLEncode x =
131
- escape <$> (fromString x UTF8 >>= toString Base64 )
131
+ escape <$> (( fromString x UTF8 :: Effect Buffer ) >>= toString Base64 )
132
132
133
133
escape :: String -> String
134
134
escape =
You can’t perform that action at this time.
0 commit comments