Browse code
2006-12-21 Kevin Layer <layer@gemini.franz.com>
layer authored on 21/12/2006 18:22:15
Showing 2 changed files
Showing 2 changed files
... | ... |
@@ -1,8 +1,11 @@ |
1 |
-;; $Id: mime-transfer-encoding.cl,v 1.4 2006/12/11 22:45:38 layer Exp $ |
|
1 |
+;; $Id: mime-transfer-encoding.cl,v 1.5 2006/12/21 18:22:15 layer Exp $ |
|
2 | 2 |
|
3 | 3 |
(defpackage :net.post-office |
4 | 4 |
(:use #:lisp #:excl) |
5 |
- (:import-from #:excl #:base64-encode-stream #:base64-decode-stream) |
|
5 |
+ (:import-from #:excl #:base64-encode-stream |
|
6 |
+ #+(or (version= 8 0) |
|
7 |
+ (version>= 8 1 pre-beta 4)) |
|
8 |
+ #:base64-decode-stream) |
|
6 | 9 |
(:export |
7 | 10 |
#:base64-encode-stream |
8 | 11 |
#:base64-decode-stream |