From ddccf2f5f8c12c3c9686d0ecdbfe5b8e1a0997c4 Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Thu, 9 Jun 2011 23:15:54 +0200 Subject: Be consistent... "incoming-only?:" is ugly as hell for a keyword --- smsmatrix.scm | 4 ++-- 1 file 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 -- cgit v1.2.3