google.translate: fix the conflict in a naive way.

db4
Doug Coleman 2015-08-12 20:36:08 -07:00
parent d9fbadf7fe
commit 111bded865
1 changed files with 2 additions and 2 deletions

View File

@ -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 {