Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
get rid of repositories that aren't in the given list of repostiroy descriptions.
"run this to remove cruft before saving image for download"
| standardRepos |
standardRepos := #('http://ss3.gemstone.com/ss/Pharo14' 'http://ss3.gemstone.com/ss/FileTree'
'http://www.squeaksource.com/OSProcess' 'http://seaside.gemstone.com/ss/metacello' ).
MCRepositoryGroup default repositories do: [:repo |
(standardRepos includes: repo description)
ifFalse: [ MCRepositoryGroup default removeRepository: repo ]].
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment