Extension { #name : #FileReference }
{ #category : #'*Grafoscopio-Utils' }
FileReference >> basenameWithoutChecksum [
^ (self basenameWithoutExtension splitOn: '--') first
]