diff --git a/base64.asd b/base64.asd index a89a0dd64b1f94847a860edecf8ac623afaaf2f7..a26db954e1e5eba5d8d4ad1965616751e3ed0e69 100644 --- a/base64.asd +++ b/base64.asd @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Dec 2002 ;;;; -;;;; $Id: base64.asd,v 1.15 2003/04/15 16:05:39 kevin Exp $ +;;;; $Id: base64.asd,v 1.16 2003/04/15 16:08:21 kevin Exp $ ;;;; ************************************************************************* (in-package :asdf) @@ -39,5 +39,5 @@ )) (defmethod perform ((o test-op) (c (eql (find-system :base64)))) - (or (test-base64) + (or (funcall (intern (symbol-name #:test-base64) (find-package 'base64))) (error "test-op failed")))