--- a/mercurial/HGCommandParser.st Sat Dec 15 18:02:33 2012 +0100
+++ b/mercurial/HGCommandParser.st Sun Dec 16 01:31:06 2012 +0100
@@ -261,11 +261,12 @@
].
].
rev setMessage: message.
+ rev setNonLazy.
^rev
"Created: / 13-11-2012 / 09:45:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 05-12-2012 / 23:32:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 16-12-2012 / 00:38:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
parseName
@@ -447,13 +448,12 @@
"Filenames are 0-byte separated. Yeah, Mercurial is easy
to parse"
- | filenames zero |
- zero := Character codePoint: 0.
+ | filenames |
filenames := OrderedCollection new.
[ stream atEnd ] whileFalse:[
| filename |
- filename := stream upTo: zero.
+ filename := stream nextLine.
"/ Workaround for Mercurial 2.3.x which includes trailing new line
(filename size ~~ 1 or:[filename first ~~ Character cr]) ifTrue:[
filenames add: filename
@@ -462,7 +462,7 @@
^filenames.
"Created: / 16-11-2012 / 22:35:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified (comment): / 17-11-2012 / 19:40:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 16-12-2012 / 00:09:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
parseCommandLog