diff -r 97ec3bf7d991 -r 2eb4b86bd0a6 ProjectBrowser.st --- a/ProjectBrowser.st Thu Sep 23 19:55:16 1999 +0200 +++ b/ProjectBrowser.st Fri Sep 24 15:02:03 1999 +0200 @@ -589,7 +589,7 @@ #name: 'NewApplication' #min: #(#Point 10 10) #max: #(#Point 1280 1024) - #bounds: #(#Rectangle 420 49 720 349) + #bounds: #(#Rectangle 3 77 303 377) ) #component: #(#SpecCollection @@ -2273,29 +2273,30 @@ - - ^ #( - #(#DataSetColumnSpec - #label: 'Class' - #id: 'classColumn' - #labelAlignment: #left - #model: #classNameFromClassInfo: + ^#( + #(#DataSetColumnSpec + #label: 'Class' + #id: 'classColumn' + #labelAlignment: #left + #model: #classNameFromClassInfo: ) - #(#DataSetColumnSpec - #label: 'Included' - #id: 'inclusion' - #columnAlignment: #center - #width: 100 - #editorType: #ComboList - #model: #classIncludeConditionFromClassInfo: + #(#DataSetColumnSpec + #label: 'Included' + #id: 'inclusion' + #width: 150 + #editorType: #ComboList + #choices: #listOfPossibleConditions: + #model: #classIncludeConditionFromClassInfo: + #writeSelector: #classIncludeConditionFromClassInfo:put: ) - #(#DataSetColumnSpec - #label: 'Filename' - #labelAlignment: #left - #minWidth: 200 - #model: #classFilenameFromClassInfo: + #(#DataSetColumnSpec + #label: 'Filename' + #labelAlignment: #left + #minWidth: 200 + #model: #classFilenameFromClassInfo: ) - ) + ) + ! patchesTableColumns @@ -2831,6 +2832,12 @@ "Created: / 23.3.1999 / 14:18:05 / cg" ! +listOfPossibleConditions:aRow + ^ #( always never autoload '-' unix win32 vms macos) + + +! + listOfRequiredClassesInPrerequisites "automatically generated by UIPainter ..." @@ -4015,6 +4022,10 @@ ^ cInfo conditionForInclusion ! +classIncludeConditionFromClassInfo:cInfo put:aSymbol + cInfo conditionForInclusion:aSymbol +! + classNameFromClassInfo:cInfo ^ cInfo className !