r4492: Auto commit for Debian build
[cl-base64.git] / base64.asd
index cc48ee541657e492a626e64502d4fa2a70c1edaa..a26db954e1e5eba5d8d4ad1965616751e3ed0e69 100644 (file)
@@ -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.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 (base64::test-base64)
+  (or (funcall (intern (symbol-name #:test-base64) (find-package 'base64)))
       (error "test-op failed")))