diff options
-rw-r--r-- | smsmatrix.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/smsmatrix.scm b/smsmatrix.scm index 77c2441..378ca9e 100644 --- a/smsmatrix.scm +++ b/smsmatrix.scm @@ -233,14 +233,14 @@ ;; Not really part of the "API" as such since it returns something completely ;; different than =-separated lists of key/value pairs and "email" vs "username" -(define (call-with-csv-report proc #!key username password limit incoming-only?) +(define (call-with-csv-report proc #!key username password limit incoming-only) (let-auth 'csv-report username password (let* ((request (make-request method: 'POST uri: (uri-reference csv-report-uri))) (params `((email . ,username) (password . ,password) (limit . ,limit) - (in . ,(if incoming-only? 1 0))))) + (in . ,(if incoming-only 1 0))))) (call-with-input-request request params proc)))) (define (send-sms recipients message #!key |