[Pharo-project] FSPlatformResolver class>>forCurrentPlatform use a deprecated method

In the package Filesystem, FSPlatformResolver class >> forCurrentPlatform | platformName | platformName := SmalltalkImage current platformName. ^ (self allSubclasses detect: [:ea | ea platformName = platformName]) new should be replaced by FSPlatformResolver class >> forCurrentPlatform | platformName | platformName := OSPlatform platformName. ^ (self allSubclasses detect: [:ea | ea platformName = platformName]) new