Welcome to the CHICKEN Scheme pasting service
yBOSS added by andyjpb on Fri Dec 7 17:09:20 2012
(use oauth-client) (define yBOSS (make-oauth-service-provider protocol-version: '1.0 credential-request-url: "https://not-required" owner-auth-url: "https://not-required" token-request-url: "https://not-required" signature-method: 'plaintext)) (define yBOSS-app (make-oauth-service service: yBOSS client-credential: (make-oauth-credential "<token>" "<secret>"))) (with-oauth yBOSS-app empty-credential (lambda () (call-with-input-request "https://yboss.yahooapis.com/ysearch/web?q=ipod" #f (cut read-string #f <>))))