diff --git a/base64.asd b/base64.asd index cc48ee541657e492a626e64502d4fa2a70c1edaa..a89a0dd64b1f94847a860edecf8ac623afaaf2f7 100644 --- a/base64.asd +++ b/base64.asd @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Dec 2002 ;;;; -;;;; $Id: base64.asd,v 1.14 2003/04/15 16:03:54 kevin Exp $ +;;;; $Id: base64.asd,v 1.15 2003/04/15 16:05:39 kevin Exp $ ;;;; ************************************************************************* (in-package :asdf) @@ -39,5 +39,5 @@ )) (defmethod perform ((o test-op) (c (eql (find-system :base64)))) - (or (base64::test-base64) + (or (test-base64) (error "test-op failed"))) diff --git a/package.lisp b/package.lisp index 71f6405cae780b8ca508db2a6e042ef19f485f90..fca5cd21baa25b1b30412b7ba6c02a92efc69989 100644 --- a/package.lisp +++ b/package.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Dec 2002 ;;;; -;;;; $Id: package.lisp,v 1.3 2003/01/14 11:59:44 kevin Exp $ +;;;; $Id: package.lisp,v 1.4 2003/04/15 16:05:39 kevin Exp $ ;;;; ;;;; ************************************************************************* @@ -37,6 +37,8 @@ #:*uri-encode-table* #:*uri-decode-table* #:make-decode-table + + #:test-base64 )) (in-package #:cl-base64)