Improving key names, as FossilRepo deal mostly with files.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-03-18 13:50:35 -05:00
parent 378d42b6c8
commit d90f1409fb

View File

@ -486,13 +486,13 @@ FossilRepo >> status [
]. ].
edited := status lines select: [ :line | line beginsWith: 'EDITED' ]. edited := status lines select: [ :line | line beginsWith: 'EDITED' ].
output output
at: 'edited files' at: 'edited'
put: (edited collect: put: (edited collect:
[ :line | (line withoutPrefix: 'EDITED') trimmed accentedCharactersCorrection ]). [ :line | (line withoutPrefix: 'EDITED') trimmed accentedCharactersCorrection ]).
missing := status lines select: [ :line | line beginsWith: 'MISSING' ]. missing := status lines select: [ :line | line beginsWith: 'MISSING' ].
output output
at: 'missing files' at: 'missing'
put: (missing collect: put: (missing collect:
[ :line | (line withoutPrefix: 'MISSING') trimmed accentedCharactersCorrection ]). [ :line | (line withoutPrefix: 'MISSING') trimmed accentedCharactersCorrection ]).
^ output ^ output