diff --git a/puri.asd b/puri.asd
index 0e4ea9c..94e2ee2 100644
--- a/puri.asd
+++ b/puri.asd
@@ -16,18 +16,18 @@
   ((:file "src")))
 
 (defmethod perform ((o test-op) (c (eql (find-system 'puri))))
-  (oos 'load-op 'puri-tests)
-  (oos 'test-op 'puri-tests))
+  (oos 'load-op 'puri/tests)
+  (oos 'test-op 'puri/tests))
 
-(defsystem puri-tests
+(defsystem puri/tests
     :depends-on (:puri :ptester) 
     :components
     ((:file "tests")))
 
-(defmethod perform ((o test-op) (c (eql (find-system 'puri-tests))))
+(defmethod perform ((o test-op) (c (eql (find-system 'puri/tests))))
   (or (funcall (intern (symbol-name '#:do-tests)
 		       (find-package :puri-tests)))
       (error "test-op failed")))
 
-(defmethod operation-done-p ((o test-op) (c (eql (find-system 'puri-tests))))
+(defmethod operation-done-p ((o test-op) (c (eql (find-system 'puri/tests))))
   (values nil))