]> gitweb.factorcode.org Git - factor.git/commitdiff
google.gmail: fix to use set-query-params.
authorJohn Benediktsson <mrjbq7@gmail.com>
Mon, 23 Jan 2017 18:06:16 +0000 (10:06 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Mon, 23 Jan 2017 18:06:16 +0000 (10:06 -0800)
extra/google/gmail/gmail.factor

index 941e5ab37fd4f04434e2ffb413f306799af08026..a5ff85235efdc0835a5d18b55ecabef41f5ea17f 100644 (file)
@@ -1,6 +1,7 @@
 ! Copyright (C) 2016 Björn Lindqvist.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors arrays json.reader kernel namespaces oauth2 sequences ;
+USING: accessors arrays json.reader kernel namespaces oauth2
+sequences urls ;
 IN: google.gmail
 
 CONSTANT: api-base "https://www.googleapis.com/gmail/v1/users"
@@ -29,7 +30,7 @@ SYMBOL: access-token
 
 : api-call ( method get-params -- result )
     ensure-token
-    [ api-base prepend ] dip string+params>url
+    [ api-base prepend >url ] dip set-query-params
     access-token get access>> oauth-http-get nip
     json> ;