hg/stx-libtool2: comparison ProjectBrowser.st

equal deleted inserted replaced

-:97ec3bf7d991
+:2eb4b86bd0a6
 #(#WindowSpec
 #label: 'NewApplication'
 #name: 'NewApplication'
 #min: #(#Point 10 10)
 #max: #(#Point 1280 1024)
-#bounds: #(#Rectangle 420 49 720 349)
+#bounds: #(#Rectangle 3 77 303 377)
 )
 #component:
 #(#SpecCollection
 #collection: #(
 #(#DataSetSpec
 DataSetBuilder new openOnClass:ProjectBrowser andSelector:#classTableColumns
 "
 <resource: #tableColumns>
+^#(
-^ #(
+#(#DataSetColumnSpec
-#(#DataSetColumnSpec
+#label: 'Class'
-#label: 'Class'
+#id: 'classColumn'
-#id: 'classColumn'
+#labelAlignment: #left
-#labelAlignment: #left
+#model: #classNameFromClassInfo:
-#model: #classNameFromClassInfo:
 )
 #(#DataSetColumnSpec
 #label: 'Included'
 #id: 'inclusion'
-#columnAlignment: #center
+#width: 150
-#width: 100
+#editorType: #ComboList
-#editorType: #ComboList
+#choices: #listOfPossibleConditions:
 #model: #classIncludeConditionFromClassInfo:
+#writeSelector: #classIncludeConditionFromClassInfo:put:
 )
 #(#DataSetColumnSpec
 #label: 'Filename'
 #labelAlignment: #left
 #minWidth: 200
 #model: #classFilenameFromClassInfo:
 )
 )
 !
 patchesTableColumns
 "This resource specification was automatically generated
 by the DataSetBuilder of ST/X."
 ^ holder.
 "Created: / 23.3.1999 / 14:18:05 / cg"
 !
+listOfPossibleConditions:aRow
+^ #( always never autoload '-' unix win32 vms macos)
+!
 listOfRequiredClassesInPrerequisites
 "automatically generated by UIPainter ..."
 |holder|
 ^ cInfo classFileName
 !
 classIncludeConditionFromClassInfo:cInfo
 ^ cInfo conditionForInclusion
+!
+classIncludeConditionFromClassInfo:cInfo put:aSymbol
+cInfo conditionForInclusion:aSymbol
 !
 classNameFromClassInfo:cInfo
 ^ cInfo className
 !

changeset 1235	2eb4b86bd0a6
parent 1234	97ec3bf7d991
child 1236	a7dbf8ace3f4