On Wed, Sep 18, 2013 at 11:04 AM, Sabine Knöfel <sabine.knoefel@gmail.com> wrote:
I always commit in smalltalkhub and ss3.gemtalksystems. So if one is down, I can use the other.
for those who don't know, each commit you do from Pharo is saved locally on your hard drive (by default, in a package-cache directory). So, even when servers are down, you should have access to your mcz files. What I and some others do is to configure Pharo so that all images share the same package-cache directory. This way, you can change image frequently and still have all your mcz around. To do that, we create a file ~/.config/pharo/monticello.st and place the following in it: StartupLoader default executeAtomicItems: { StartupAction name: 'Monticello related stuff' code: [| sharedPackageCacheDirectory | FileStream stdout lf; nextPutAll: 'Executing Monticello related stuff for Pharo 3.0'; lf. sharedPackageCacheDirectory := '/home/cassou/Documents/smalltalk/cache'. sharedPackageCacheDirectory asFileReference ensureCreateDirectory. MCCacheRepository default directory: sharedPackageCacheDirectory asFileReference. MCDirectoryRepository defaultDirectoryName: sharedPackageCacheDirectory. FileStream stdout lf; nextPutAll: 'Finished'; lf]. }. In this file, you can also set the repositories you often use. That's very convenient if you don't want to copy your username and password all the time. Just before the last FileStream line, add: MCRepositoryGroup default repositories select: [:each | (each isKindOf: MCHttpRepository) and: [each location includesSubstring: 'squeaksource.com']] thenDo: [:each | each user: 'dc'; password: 'XXXXX']. MCRepositoryGroup default repositories select: [:each | (each isKindOf: MCHttpRepository) and: [each location includesSubstring: 'ss3.gemstone.com']] thenDo: [:each | each user: 'dc'; password: 'XXXXX']. MCRepositoryGroup default repositories select: [:each | (each isKindOf: MCHttpRepository) and: [each location includesSubstring: 'source.squeak.org' ]] thenDo: [ :repo | repo user: 'DamienCassou'; password: 'XXXXX' ]. MCRepositoryGroup default repositories select: [:each | (each isKindOf: MCHttpRepository) and: [each location includesSubstring: 'smalltalkhub.com' ]] thenDo: [ :repo | repo user: 'DamienCassou'; password: 'XXXXX ]. -- Damien Cassou http://damiencassou.seasidehosting.st "Success is the ability to go from one failure to another without losing enthusiasm." Winston Churchill