equal
deleted
inserted
replaced
42 " |
42 " |
43 Test of filein of a class with non-ASCII/ISO8859-1 chars |
43 Test of filein of a class with non-ASCII/ISO8859-1 chars |
44 " |
44 " |
45 | file | |
45 | file | |
46 |
46 |
47 file := (Smalltalk getPackageDirectoryForPackage: self class package) / 'testData' / 'packages' / 'p1utf8' / 'ProjectDefinitionTestsP1UTF8Bar.st'. |
47 file := Helper packageDirectoryForRegressionTests / 'testData' / 'packages' / 'p1utf8' / 'ProjectDefinitionTestsP1UTF8Bar.st'. |
48 self assert: file exists. |
48 self assert: file exists. |
49 |
49 |
50 file fileIn. |
50 file fileIn. |
51 |
51 |
52 self assert: (Smalltalk at:#ProjectDefinitionTestsP1UTF8Bar) notNil. |
52 self assert: (Smalltalk at:#ProjectDefinitionTestsP1UTF8Bar) notNil. |