mercurial/HGCommandParser.st
changeset 38 c3d02ed6a645
parent 36 41cb88196e69
child 39 10e693b3e034
--- a/mercurial/HGCommandParser.st	Tue Oct 23 11:04:26 2012 +0000
+++ b/mercurial/HGCommandParser.st	Fri Nov 09 12:09:13 2012 +0000
@@ -64,18 +64,20 @@
 !
 
 nextLine
-    stream nextLine
+    ^stream nextLine
 
     "Created: / 23-10-2012 / 11:05:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 09-11-2012 / 12:02:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 nextSpace
     | c |
-    ((c := stream next) ~= Character space) ifFalse:[
+    ((c := stream next) ~= Character space) ifTrue:[
         self error:'Space expected. ''', c , ''' found!!'
     ]
 
     "Created: / 23-10-2012 / 10:58:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 09-11-2012 / 11:59:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !HGCommandParser class methodsFor:'documentation'!