equal
deleted
inserted
replaced
5511 ! |
5511 ! |
5512 |
5512 |
5513 unitForFileSize |
5513 unitForFileSize |
5514 "may return either 1000 or 1024" |
5514 "may return either 1000 or 1024" |
5515 |
5515 |
5516 ^ self at:#unitForFileSize ifAbsent:[1000] |
5516 ^ self at:#unitForFileSize ifAbsent:[1024] |
5517 ! |
5517 ! |
5518 |
5518 |
5519 unitStringsForFileSize |
5519 unitStringsForFileSize |
5520 self unitForFileSize == 1024 ifTrue:[ |
5520 self unitForFileSize == 1024 ifTrue:[ |
5521 ^ #('Byte' 'KiB' 'MiB' 'GiB' 'TiB' 'PiB' 'EiB' 'ZiB' 'YiB') |
5521 ^ #('Byte' 'KiB' 'MiB' 'GiB' 'TiB' 'PiB' 'EiB' 'ZiB' 'YiB') |