added full egg support

master 1
t@thintz.com 13 years ago
parent ea1b96f2c8
commit bf4f53bb4c

@ -1,3 +1,40 @@
; author: Thomas Hintz
; email: t@thintz.com
; license: bsd
; Copyright (c) 2012, Thomas Hintz
; All rights reserved.
; Redistribution and use in source and binary forms, with or without
; modification, are permitted provided that the following conditions are met:
; * Redistributions of source code must retain the above copyright
; notice, this list of conditions and the following disclaimer.
; * Redistributions in binary form must reproduce the above copyright
; notice, this list of conditions and the following disclaimer in the
; documentation and/or other materials provided with the distribution.
; * Neither the name of the <organization> nor the
; names of its contributors may be used to endorse or promote products
; derived from this software without specific prior written permission.
; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
; ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
; DISCLAIMED. IN NO EVENT SHALL THOMAS HINTZ BE LIABLE FOR ANY
; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
(module send-grid
(;; params
api-user api-key
;; procs
send-mail)
(import scheme chicken)
(use http-client uri-common intarweb json srfi-1 srfi-18)
(define api-user (make-parameter ""))
@ -18,4 +55,5 @@
,(if html `(html . ,html) `(text . ,text))
(from . ,from)
(fromname . ,from-name)))
(abort "You must specify all keyword parameters!")))
(abort "All parameters are required for successfully sending mail.")))
)

@ -2,7 +2,7 @@
; email: t@thintz.com
; license: bsd
(compile -s -O2 -d1 send-grid.scm -j amazon-s3)
(compile -s -O2 -d1 send-grid.scm -j send-grid)
(compile -s send-grid.import.scm -O2 -d0)
(compile -c -O2 -d1 send-grid.scm -unit send-grid -j send-grid)

Loading…
Cancel
Save