Deploying Pharo Smalltalk Application

deploy.cs

deploySystem
    World closeAllWindowsDiscardingChanges.
    FreeTypeFontProvider current updateFromSystem.
    MCRepositoryGroup
        allSubInstancesDo: [ :gr | gr repositories do: [ :r | gr removeRepository: r ] ].
    IceRepository registry removeAll.
    IceCredentialStore current
        in:
            [ :store | store allCredentials do: [ :each | each removeFrom: store ] ].
    Smalltalk cleanUp: true except: {} confirming: false.
    Deprecation
        raiseWarning: false;
        showWarning: false.
    NoChangesLog install.
    NoPharoFilesOpener install.
    Stdio useNullStreams.
    MCCacheRepository uniqueInstance disable.
    EpMonitor reset.
    5 timesRepeat: [ Smalltalk garbageCollect ].
    Smalltalk snapshot: true andQuit: true