--- a/packages/PackageManagerTests.st Tue May 13 11:43:44 2003 +0200
+++ b/packages/PackageManagerTests.st Fri May 16 13:44:11 2003 +0200
@@ -631,8 +631,8 @@
"<tested method>"
packageManager moveClassNamed:#QWERTZ fromPackage:package2 toPackage:package1.
"</tested method>>"
- self shouldnt:(package2 includesPackagedClassNamed:QWERTZ).
- self assert:(package1 includesPackagedClassNamed:QWERTZ).
+ self shouldnt:(package2 includesPackagedClassNamed:#QWERTZ).
+ self assert:(package1 includesPackagedClassNamed:#QWERTZ).
self shouldnt:(package1 packagedClassNamed:#QWERTZ) isInSmalltalk.
self assert:(package2 isDirty).
@@ -700,5 +700,5 @@
!PackageManagerTests class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/packages/PackageManagerTests.st,v 1.2 2003-05-12 11:11:58 james Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/packages/PackageManagerTests.st,v 1.3 2003-05-16 11:44:11 james Exp $'
! !