google.translate: fix the conflict in a naive way.
parent
d9fbadf7fe
commit
111bded865
|
@ -18,10 +18,10 @@ CONSTANT: maximum-translation-size 5120
|
||||||
: assoc>query-response ( assoc -- response )
|
: assoc>query-response ( assoc -- response )
|
||||||
google-translate-url http-post nip ;
|
google-translate-url http-post nip ;
|
||||||
|
|
||||||
ERROR: response-error response error ;
|
TUPLE: response-error response error ;
|
||||||
|
|
||||||
: throw-response-error ( response -- * )
|
: throw-response-error ( response -- * )
|
||||||
"responseDetails" over at response-error ;
|
[ ] [ "responseDetails" of ] bi response-error boa throw ;
|
||||||
|
|
||||||
: check-response ( response -- response )
|
: check-response ( response -- response )
|
||||||
"responseStatus" over at {
|
"responseStatus" over at {
|
||||||
|
|
Loading…
Reference in New Issue