equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1997 by eXept Software AG |
4 COPYRIGHT (c) 1997 by eXept Software AG |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
5677 moduleListUpdater := [ |
5679 moduleListUpdater := [ |
5678 |l| |
5680 |l| |
5679 |
5681 |
5680 list2 list:nil. |
5682 list2 list:nil. |
5681 |
5683 |
5682 l := Array new. |
5684 l := #(). |
5683 handles := Array new. |
5685 handles := #(). |
5684 |
5686 |
5685 (showModules value or:[showBuiltIn value]) ifTrue:[ |
5687 (showModules value or:[showBuiltIn value]) ifTrue:[ |
5686 allModules := ObjectMemory binaryModuleInfo asOrderedCollection. |
5688 allModules := ObjectMemory binaryModuleInfo asOrderedCollection. |
5687 (showBuiltIn value and:[showModules value]) ifFalse:[ |
5689 (showBuiltIn value and:[showModules value]) ifFalse:[ |
5688 allModules := allModules select:[:i | |
5690 allModules := allModules select:[:i | |