*** empty log message *** expecco_1_0_3
authorClaus Gittinger <cg@exept.de>
Tue, 21 Nov 2006 18:08:38 +0100
changeset 2146a5ce8e00652f
parent 2145 4233bdb1ee28
child 2147 ff72b5236caf
*** empty log message ***
Tools__ProjectDefinitionEditor.st
     1.1 --- a/Tools__ProjectDefinitionEditor.st	Fri Nov 17 15:12:37 2006 +0100
     1.2 +++ b/Tools__ProjectDefinitionEditor.st	Tue Nov 21 18:08:38 2006 +0100
     1.3 @@ -1177,23 +1177,23 @@
     1.4        (DataSetColumnSpec
     1.5           label: 'Auto'
     1.6           labelButtonType: Button
     1.7 +         editorType: CheckToggle
     1.8           rendererType: CheckToggle
     1.9           model: autoloaded
    1.10 -         canSelect: false
    1.11         )
    1.12        (DataSetColumnSpec
    1.13           label: 'Win32'
    1.14           labelButtonType: Button
    1.15 +         editorType: CheckToggle
    1.16           rendererType: CheckToggle
    1.17           model: win32
    1.18 -         canSelect: false
    1.19         )
    1.20        (DataSetColumnSpec
    1.21           label: 'Unix'
    1.22           labelButtonType: Button
    1.23 +         editorType: CheckToggle
    1.24           rendererType: CheckToggle
    1.25           model: unix
    1.26 -         canSelect: false
    1.27         )
    1.28        )
    1.29      
    1.30 @@ -1749,21 +1749,22 @@
    1.31  
    1.32      entries := OrderedCollection new.
    1.33      definitionClass
    1.34 -	classNamesAndAttributesDo:[:className :attributes |
    1.35 -	    |entry|
    1.36 +        classNamesAndAttributesDo:[:className :attributes |
    1.37 +            |entry|
    1.38  
    1.39 -	    entry := ClassListEntry new.
    1.40 -	    entry
    1.41 -		className:className
    1.42 -		autoloaded:(attributes includes:#autoload)
    1.43 -		win32:(attributes includes:#win32)
    1.44 -		unix:(attributes includes:#unix).
    1.45 -	    entries add:entry.
    1.46 -	].
    1.47 -
    1.48 +            entry := ClassListEntry new.
    1.49 +            entry
    1.50 +                className:className
    1.51 +                autoloaded:(attributes includes:#autoload)
    1.52 +                win32:(attributes includes:#win32)
    1.53 +                unix:(attributes includes:#unix).
    1.54 +            entries add:entry.
    1.55 +        ].
    1.56 +    entries sort:[:a :b | a className < b className].
    1.57      ^ entries.
    1.58  
    1.59      "Created: / 05-09-2006 / 12:31:26 / cg"
    1.60 +    "Modified: / 21-11-2006 / 18:04:35 / cg"
    1.61  !
    1.62  
    1.63  fetchExtensionsListEntries
    1.64 @@ -2190,8 +2191,10 @@
    1.65      ^ autoloaded
    1.66  !
    1.67  
    1.68 -autoloaded:something
    1.69 -    autoloaded := something.
    1.70 +autoloaded:aBoolean
    1.71 +    autoloaded := aBoolean.
    1.72 +
    1.73 +    "Modified: / 21-11-2006 / 18:05:26 / cg"
    1.74  !
    1.75  
    1.76  className
    1.77 @@ -2213,16 +2216,20 @@
    1.78      ^ unix
    1.79  !
    1.80  
    1.81 -unix:something
    1.82 -    unix := something.
    1.83 +unix:aBoolean
    1.84 +    unix := aBoolean.
    1.85 +
    1.86 +    "Modified: / 21-11-2006 / 18:05:32 / cg"
    1.87  !
    1.88  
    1.89  win32
    1.90      ^ win32
    1.91  !
    1.92  
    1.93 -win32:something
    1.94 -    win32 := something.
    1.95 +win32:aBoolean
    1.96 +    win32 := aBoolean.
    1.97 +
    1.98 +    "Modified: / 21-11-2006 / 18:05:35 / cg"
    1.99  ! !
   1.100  
   1.101  !ProjectDefinitionEditor::ExtensionsListEntry methodsFor:'accessing'!