fixed unit tests

german · Jul 5, 2011 · 8b3186a · 8b3186a
1 parent 85b573e
commit 8b3186a
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/lib/UITest.st b/src/lib/UITest.st
@@ -44,9 +44,10 @@ Test subclass: UITestCase [
   ]
 
   testDisplayClassTest [
-    ui displayClass: Object test: 'someTest'.
+    ui displayClass: Object test: 'someTest' line: '123'.
 
     self assert: (output message =~ 'Object#someTest has damaged your karma.') matched.
+    self assert: (output message =~ 'in src/koans/Object\.st:122-123') matched.
   ]
 
   testDisplayEndMessageFailed [
@@ -78,6 +79,7 @@ Test subclass: UITestCase [
 
     dictionary := Dictionary new
                              add: #message  -> 'Hello World!';
+                             add: #line     -> '123';
                              add: #expected -> 15;
                              add: #actual   -> nil;
                              add: #class    -> Object;