initial commit

.gitignore

@@ -0,0 +1,8 @@
+*.fasl
+*.dx32fsl
+*.dx64fsl
+*.lx32fsl
+*.lx64fsl
+*.x86f
+*~
+.#*

LICENSE.txt

@@ -0,0 +1,32 @@
+Copyright (c) 2015, Cody Reichert
+
+Copyright (c) 2013, Art Obrezan
+
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are
+met:
+
+1. Redistributions of source code must retain the above copyright
+notice, this list of conditions and the following disclaimer.
+
+2. 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.
+
+3. Use in source and binary forms are not permitted in projects under
+GNU General Public Licenses and its derivatives.
+
+THIS SOFTWARE IS PROVIDED BY ART
+OBREZAN ''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 ART
+OBREZAN 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.
+

README.org

@@ -0,0 +1,15 @@
+* Cl-Ses  - Send AWS SES Emails from Common Lisp
+
+** Usage
+
+** Dependencies
+
+** Installation
+
+** Author
+
++ Cody Reichert (codyreichert@gmail.com)
+
+** Copyright
+
+Copyright (c) 2015 Cody Reichert (codyreichert@gmail.com)

cl-ses-test.asd

@@ -0,0 +1,24 @@
+#|
+  This file is a part of cl-ses project.
+  Copyright (c) 2015 Cody Reichert (codyreichert@gmail.com)
+|#
+
+(in-package :cl-user)
+(defpackage cl-ses-test-asd
+  (:use :cl :asdf))
+(in-package :cl-ses-test-asd)
+
+(defsystem cl-ses-test
+  :author "Cody Reichert"
+  :license ""
+  :depends-on (:cl-ses
+               :prove)
+  :components ((:module "t"
+                :components
+                ((:test-file "cl-ses"))))
+  :description "Test system for cl-ses"
+
+  :defsystem-depends-on (:prove-asdf)
+  :perform (test-op :after (op c)
+                    (funcall (intern #.(string :run-test-system) :prove-asdf) c)
+                    (asdf:clear-system c)))

cl-ses.asd

@@ -0,0 +1,38 @@
+#|
+  This file is a part of cl-ses project.
+  Copyright (c) 2015 Cody Reichert (codyreichert@gmail.com)
+|#
+
+#|
+  Send AWS SES Emails from Common Lisp
+
+  Author: Cody Reichert (codyreichert@gmail.com)
+|#
+
+(in-package :cl-user)
+(defpackage cl-ses-asd
+  (:use :cl :asdf))
+(in-package :cl-ses-asd)
+
+(defsystem cl-ses
+  :version "0.1"
+  :author "Cody Reichert"
+  :license "BSD 3-Clause"
+  :depends-on (:drakma)
+  :components ((:module "src"
+                :components
+                ((:file "cl-ses"))))
+  :description "Send AWS SES Emails from Common Lisp"
+  :long-description
+  #.(with-open-file (stream (merge-pathnames
+                             #p"README.markdown"
+                             (or *load-pathname* *compile-file-pathname*))
+                            :if-does-not-exist nil
+                            :direction :input)
+      (when stream
+        (let ((seq (make-array (file-length stream)
+                               :element-type 'character
+                               :fill-pointer t)))
+          (setf (fill-pointer seq) (read-sequence seq stream))
+          seq)))
+  :in-order-to ((test-op (test-op cl-ses-test))))