# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1164128918 -3600
# Node ID a5ce8e00652f87df21c2324d2d7694c2c341aaea
# Parent  4233bdb1ee28e0690bc425c0abff617f02ba8770
*** empty log message ***

diff -r 4233bdb1ee28 -r a5ce8e00652f Tools__ProjectDefinitionEditor.st
--- a/Tools__ProjectDefinitionEditor.st	Fri Nov 17 15:12:37 2006 +0100
+++ b/Tools__ProjectDefinitionEditor.st	Tue Nov 21 18:08:38 2006 +0100
@@ -1177,23 +1177,23 @@
       (DataSetColumnSpec
          label: 'Auto'
          labelButtonType: Button
+         editorType: CheckToggle
          rendererType: CheckToggle
          model: autoloaded
-         canSelect: false
        )
       (DataSetColumnSpec
          label: 'Win32'
          labelButtonType: Button
+         editorType: CheckToggle
          rendererType: CheckToggle
          model: win32
-         canSelect: false
        )
       (DataSetColumnSpec
          label: 'Unix'
          labelButtonType: Button
+         editorType: CheckToggle
          rendererType: CheckToggle
          model: unix
-         canSelect: false
        )
       )
     
@@ -1749,21 +1749,22 @@
 
     entries := OrderedCollection new.
     definitionClass
-	classNamesAndAttributesDo:[:className :attributes |
-	    |entry|
+        classNamesAndAttributesDo:[:className :attributes |
+            |entry|
 
-	    entry := ClassListEntry new.
-	    entry
-		className:className
-		autoloaded:(attributes includes:#autoload)
-		win32:(attributes includes:#win32)
-		unix:(attributes includes:#unix).
-	    entries add:entry.
-	].
-
+            entry := ClassListEntry new.
+            entry
+                className:className
+                autoloaded:(attributes includes:#autoload)
+                win32:(attributes includes:#win32)
+                unix:(attributes includes:#unix).
+            entries add:entry.
+        ].
+    entries sort:[:a :b | a className < b className].
     ^ entries.
 
     "Created: / 05-09-2006 / 12:31:26 / cg"
+    "Modified: / 21-11-2006 / 18:04:35 / cg"
 !
 
 fetchExtensionsListEntries
@@ -2190,8 +2191,10 @@
     ^ autoloaded
 !
 
-autoloaded:something
-    autoloaded := something.
+autoloaded:aBoolean
+    autoloaded := aBoolean.
+
+    "Modified: / 21-11-2006 / 18:05:26 / cg"
 !
 
 className
@@ -2213,16 +2216,20 @@
     ^ unix
 !
 
-unix:something
-    unix := something.
+unix:aBoolean
+    unix := aBoolean.
+
+    "Modified: / 21-11-2006 / 18:05:32 / cg"
 !
 
 win32
     ^ win32
 !
 
-win32:something
-    win32 := something.
+win32:aBoolean
+    win32 := aBoolean.
+
+    "Modified: / 21-11-2006 / 18:05:35 / cg"
 ! !
 
 !ProjectDefinitionEditor::ExtensionsListEntry methodsFor:'accessing'!