git.fiddlerwoaroof.com
Browse code

fix defpatch for 7.0

layer authored on 03/02/2006 18:02:26
Showing 1 changed files
... ...
@@ -5,8 +5,8 @@
5 5
   :post-loadable t)
6 6
 
7 7
 #+(version= 7 0)
8
-(sys:defpatch "smtp" 1
9
-  "v1: send-letter w/attachments; send-smtp* can take streams"
8
+(sys:defpatch "smtp" 2
9
+  "v2: send-letter w/attachments; send-smtp* can take streams"
10 10
   :type :system
11 11
   :post-loadable t)
12 12
 
... ...
@@ -36,7 +36,7 @@
36 36
 ;; Suite 330, Boston, MA  02111-1307  USA
37 37
 ;;
38 38
 ;;
39
-;; $Id: smtp.cl,v 1.13 2006/02/03 05:06:28 layer Exp $
39
+;; $Id: smtp.cl,v 1.14 2006/02/03 18:02:26 layer Exp $
40 40
 
41 41
 ;; Description:
42 42
 ;;   send mail to an smtp server.  See rfc821 for the spec.