equal
deleted
inserted
replaced
7259 monticelloLabel := ((resources string:'[Monticello Packages]') asText allItalic withColor:Color grey). |
7259 monticelloLabel := ((resources string:'[Monticello Packages]') asText allItalic withColor:Color grey). |
7260 monticelloRoot type:#monticelloRoot. |
7260 monticelloRoot type:#monticelloRoot. |
7261 |
7261 |
7262 (MCRepositoryGroup isNil or:[MCRepositoryGroup isLoaded not]) ifTrue:[ |
7262 (MCRepositoryGroup isNil or:[MCRepositoryGroup isLoaded not]) ifTrue:[ |
7263 monticelloRoot icon:greyFolderIcon. |
7263 monticelloRoot icon:greyFolderIcon. |
7264 monticelloRoot label:monticelloLabel, (' (Monticello Support not Loaded)' asText colorizeAllWith:Color grey). |
7264 monticelloRoot label:monticelloLabel, (' (Monticello Support not Loaded)' withColor:Color grey). |
7265 ] ifFalse:[ |
7265 ] ifFalse:[ |
7266 monticelloRoot icon:folderIcon. |
7266 monticelloRoot icon:folderIcon. |
7267 monticelloRoot label:monticelloLabel. |
7267 monticelloRoot label:monticelloLabel. |
7268 self getMonticelloRepositories. |
7268 self getMonticelloRepositories. |
7269 ]. |
7269 ]. |
7867 |
7867 |
7868 item := self getItemByPath:path packageID:packageID. |
7868 item := self getItemByPath:path packageID:packageID. |
7869 |
7869 |
7870 isAlreadyLoaded := false. |
7870 isAlreadyLoaded := false. |
7871 Error handle:[:ex | |
7871 Error handle:[:ex | |
7872 item label:(item label , (' ERROR - please rebuild!!' colorizeAllWith:Color red)). |
7872 item label:(item label , (' ERROR - please rebuild!!' withColor:Color red)). |
7873 ] do:[ |
7873 ] do:[ |
7874 isAlreadyLoaded := |
7874 isAlreadyLoaded := |
7875 (defClass := ProjectDefinition definitionClassForPackage:packageID) notNil |
7875 (defClass := ProjectDefinition definitionClassForPackage:packageID) notNil |
7876 and:[ defClass isLoaded |
7876 and:[ defClass isLoaded |
7877 and:[ defClass isFullyLoaded ]]. |
7877 and:[ defClass isFullyLoaded ]]. |