|
|
@@ -9,7 +9,7 @@
|
|
|
(defsetting *move-categories* nil "move categoryId->account")
|
|
|
(defsetting *account-cash* "assets:Cash:RUB")
|
|
|
|
|
|
-(defparameter +raif-oauth-url+ "https://online.raiffeisen.ru/oauth/token")
|
|
|
+(defparameter +raif-oauth-url+ "https://amobile.raiffeisen.ru/oauth/token")
|
|
|
(defparameter +raif-oauth-basic-auth+ '("oauthUser" . "oauthPassword!@"))
|
|
|
(defvar *access-token* nil "Currently active access token")
|
|
|
(defvar *credentials-provider* nil "Active credentials provider")
|
|
|
@@ -25,7 +25,7 @@
|
|
|
(agets response "expires_in")
|
|
|
(agets response "resource_owner"))))
|
|
|
|
|
|
-(defparameter +raif-rest-url+ "https://online.raiffeisen.ru/rest/")
|
|
|
+(defparameter +raif-rest-url+ "https://amobile.raiffeisen.ru/rest/")
|
|
|
(defun %rest (method &optional parameters)
|
|
|
(handler-case
|
|
|
(json-request (concatenate 'string +raif-rest-url+ method)
|
