git.fiddlerwoaroof.com
Browse code

2006-01-26 Kevin Layer <layer@gemini>

layer authored on 27/01/2006 01:22:47
Showing 3 changed files
... ...
@@ -1,3 +1,8 @@
1
+2006-01-26  Kevin Layer  <layer@gemini>
2
+
3
+	* mime.cl: provide
4
+	* smtp.cl: require streamp and mime
5
+
1 6
 2006-01-26  Ahmon Dancy  <dancy@dancy>
2 7
 
3 8
 	* mime.cl, mime-parse.cl, mime-transfer-encoding.cl:  New files to
... ...
@@ -1,4 +1,4 @@
1
-;; $Id: mime.cl,v 1.1 2006/01/26 23:53:27 dancy Exp $
1
+;; $Id: mime.cl,v 1.2 2006/01/27 01:22:47 layer Exp $
2 2
 
3 3
 (defpackage :net.post-office
4 4
   (:use #:lisp #:excl)
... ...
@@ -24,6 +24,8 @@
24 24
    #:mime-part-parts
25 25
    #:mime-part-boundary))
26 26
 
27
+(provide :mime)
28
+
27 29
 (in-package :net.post-office)
28 30
 
29 31
 (eval-when (compile load eval)
... ...
@@ -24,7 +24,7 @@
24 24
 ;; Suite 330, Boston, MA  02111-1307  USA
25 25
 ;;
26 26
 ;;
27
-;; $Id: smtp.cl,v 1.10 2006/01/26 23:53:27 dancy Exp $
27
+;; $Id: smtp.cl,v 1.11 2006/01/27 01:22:47 layer Exp $
28 28
 
29 29
 ;; Description:
30 30
 ;;   send mail to an smtp server.  See rfc821 for the spec.
... ...
@@ -45,7 +45,9 @@
45 45
 (in-package :net.post-office)
46 46
 
47 47
 (eval-when (compile load eval)
48
-  (require :sasl))
48
+  (require :streamp)
49
+  (require :sasl)
50
+  (require :mime))
49 51
 
50 52
 ;; the exported functions:
51 53