diff --git a/repository/Fossil/FossilRepo.class.st b/repository/Fossil/FossilRepo.class.st index 0a07efb..f4695d8 100644 --- a/repository/Fossil/FossilRepo.class.st +++ b/repository/Fossil/FossilRepo.class.st @@ -415,11 +415,17 @@ FossilRepo >> sanitize: aFileNameWithRelativePath [ FossilRepo >> status [ | output | output := OrderedDictionary new. - (self command: 'status') linesDo: [ :line | |k v temp| + (self command: 'status') linesDo: [ :line | | k v temp commitLog | + commitLog := OrderedCollection new. temp := line splitOn: ': '. - k := temp first. - v := temp second trimmed. - output at: k put: v. + temp size = 2 + ifTrue: [ + k := temp first. + v := temp second trimmed. + output at: k put: v + ] + ifFalse: [ commitLog add: line ]. + output at: 'commitLog' put: commitLog ]. ^ output ]