--- a/Tools__ProjectDefinitionEditor.st Thu Nov 19 15:07:22 2009 +0100
+++ b/Tools__ProjectDefinitionEditor.st Mon Nov 30 09:44:47 2009 +0100
@@ -288,212 +288,212 @@
^
#(FullSpec
- name: descriptionSpec
- window:
+ name: descriptionSpec
+ window:
(WindowSpec
- label: 'NewApplication'
- name: 'NewApplication'
- min: (Point 0 0)
- bounds: (Rectangle 0 0 433 300)
- )
- component:
+ label: 'NewApplication'
+ name: 'NewApplication'
+ min: (Point 0 0)
+ bounds: (Rectangle 0 0 433 300)
+ )
+ component:
(SpecCollection
- collection: (
- (LabelSpec
- label: 'Company:'
- name: 'CompanyLabel'
- layout: (LayoutFrame 2 0.0 13 0 160 0 35 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'CompanyEntryField'
- layout: (LayoutFrame 162 0.0 12 0 -2 1.0 34 0)
- model: companyNameHolder
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'Description:'
- name: 'DescriptionLabel'
- layout: (LayoutFrame 2 0.0 39 0 160 0 61 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'DescriptionEntryField'
- layout: (LayoutFrame 162 0.0 38 0 -2 1.0 60 0)
- model: descriptionHolder
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'ProductName:'
- name: 'ProductNameLabel'
- layout: (LayoutFrame 2 0.0 65 0 160 0 87 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'ProductNameEntryField'
- layout: (LayoutFrame 162 0.0 64 0 -2 1.0 86 0)
- model: productNameHolder
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'ProductVersion:'
- name: 'ProductVersionLabel'
- layout: (LayoutFrame 2 0.0 91 0 160 0 113 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'MajorVersionNrEntryField'
- layout: (LayoutFrame 162 0.0 90 0 182 0.0 112 0)
- model: majorVersionNrHolder
- type: number
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (InputFieldSpec
- name: 'MinorVersionNrEntryField'
- layout: (LayoutFrame 184 0.0 90 0 204 0.0 112 0)
- model: minorVersionNrHolder
- type: numberOrNil
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (InputFieldSpec
- name: 'RevisionNrEntryField'
- layout: (LayoutFrame 206 0.0 90 0 226 0.0 112 0)
- model: revisionNrHolder
- type: number
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (InputFieldSpec
- name: 'ReleaseNrEntryField'
- layout: (LayoutFrame 228 0.0 90 0 248 0.0 112 0)
- model: releaseNrHolder
- type: number
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'LegalCopyright:'
- name: 'LegalCopyrightLabel'
- layout: (LayoutFrame 2 0.0 119 0 160 0 141 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'LegalCopyrightEntryField'
- layout: (LayoutFrame 162 0.0 118 0 -2 1.0 140 0)
- model: legalCopyrightHolder
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'FileDescriptionDescription:'
- name: 'FileDescriptionLabel'
- layout: (LayoutFrame 2 0.0 161 0 160 0 183 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'FileDescriptionEntryField'
- layout: (LayoutFrame 162 0.0 160 0 -2 1.0 182 0)
- model: fileDescriptionHolder
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'FileVersion:'
- name: 'FileVersionLabel'
- layout: (LayoutFrame 2 0.0 187 0 160 0 209 0)
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'FileMajorVersionNrEntryField'
- layout: (LayoutFrame 162 0.0 186 0 182 0.0 208 0)
- model: fileMajorVersionNrHolder
- type: number
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (InputFieldSpec
- name: 'FileMinorVersionNrEntryField'
- layout: (LayoutFrame 184 0.0 186 0 204 0.0 208 0)
- model: fileMinorVersionNrHolder
- type: number
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (InputFieldSpec
- name: 'FileRevisionNrEntryField'
- layout: (LayoutFrame 206 0.0 186 0 226 0.0 208 0)
- model: fileRevisionNrHolder
- type: number
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (InputFieldSpec
- name: 'FileReleaseNrEntryField'
- layout: (LayoutFrame 228 0.0 186 0 248 0.0 208 0)
- model: fileReleaseNrHolder
- type: number
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- (LabelSpec
- label: 'Icon Filename:'
- name: 'IconFileNameLabel'
- layout: (LayoutFrame 2 0.0 236 0 160 0 258 0)
- visibilityChannel: isApplicationDefinitionHolder
- translateLabel: true
- adjust: right
- )
- (InputFieldSpec
- name: 'IconFileNameEntryField'
- layout: (LayoutFrame 162 0.0 234 0 -2 1.0 256 0)
- visibilityChannel: isApplicationDefinitionHolder
- model: iconFilenameHolder
- acceptOnReturn: true
- acceptOnTab: true
- acceptOnLostFocus: true
- acceptOnPointerLeave: false
- )
- )
+ collection: (
+ (LabelSpec
+ label: 'Company:'
+ name: 'CompanyLabel'
+ layout: (LayoutFrame 2 0.0 13 0 160 0 35 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'CompanyEntryField'
+ layout: (LayoutFrame 162 0.0 12 0 -2 1.0 34 0)
+ model: companyNameHolder
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (LabelSpec
+ label: 'Description:'
+ name: 'DescriptionLabel'
+ layout: (LayoutFrame 2 0.0 39 0 160 0 61 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'DescriptionEntryField'
+ layout: (LayoutFrame 162 0.0 38 0 -2 1.0 60 0)
+ model: descriptionHolder
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (LabelSpec
+ label: 'ProductName:'
+ name: 'ProductNameLabel'
+ layout: (LayoutFrame 2 0.0 65 0 160 0 87 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'ProductNameEntryField'
+ layout: (LayoutFrame 162 0.0 64 0 -2 1.0 86 0)
+ model: productNameHolder
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (LabelSpec
+ label: 'ProductVersion:'
+ name: 'ProductVersionLabel'
+ layout: (LayoutFrame 2 0.0 91 0 160 0 113 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'MajorVersionNrEntryField'
+ layout: (LayoutFrame 162 0.0 90 0 182 0.0 112 0)
+ model: majorVersionNrHolder
+ type: number
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (InputFieldSpec
+ name: 'MinorVersionNrEntryField'
+ layout: (LayoutFrame 184 0.0 90 0 204 0.0 112 0)
+ model: minorVersionNrHolder
+ type: numberOrNil
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (InputFieldSpec
+ name: 'RevisionNrEntryField'
+ layout: (LayoutFrame 206 0.0 90 0 226 0.0 112 0)
+ model: revisionNrHolder
+ type: number
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (InputFieldSpec
+ name: 'ReleaseNrEntryField'
+ layout: (LayoutFrame 228 0.0 90 0 248 0.0 112 0)
+ model: releaseNrHolder
+ type: number
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (LabelSpec
+ label: 'LegalCopyright:'
+ name: 'LegalCopyrightLabel'
+ layout: (LayoutFrame 2 0.0 119 0 160 0 141 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'LegalCopyrightEntryField'
+ layout: (LayoutFrame 162 0.0 118 0 -2 1.0 140 0)
+ model: legalCopyrightHolder
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (LabelSpec
+ label: 'FileDescriptionDescription:'
+ name: 'FileDescriptionLabel'
+ layout: (LayoutFrame 2 0.0 161 0 160 0 183 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'FileDescriptionEntryField'
+ layout: (LayoutFrame 162 0.0 160 0 -2 1.0 182 0)
+ model: fileDescriptionHolder
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (LabelSpec
+ label: 'FileVersion:'
+ name: 'FileVersionLabel'
+ layout: (LayoutFrame 2 0.0 187 0 160 0 209 0)
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'FileMajorVersionNrEntryField'
+ layout: (LayoutFrame 162 0.0 186 0 182 0.0 208 0)
+ model: fileMajorVersionNrHolder
+ type: number
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (InputFieldSpec
+ name: 'FileMinorVersionNrEntryField'
+ layout: (LayoutFrame 184 0.0 186 0 204 0.0 208 0)
+ model: fileMinorVersionNrHolder
+ type: number
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (InputFieldSpec
+ name: 'FileRevisionNrEntryField'
+ layout: (LayoutFrame 206 0.0 186 0 226 0.0 208 0)
+ model: fileRevisionNrHolder
+ type: number
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (InputFieldSpec
+ name: 'FileReleaseNrEntryField'
+ layout: (LayoutFrame 228 0.0 186 0 248 0.0 208 0)
+ model: fileReleaseNrHolder
+ type: number
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ (LabelSpec
+ label: 'Icon Filename:'
+ name: 'IconFileNameLabel'
+ layout: (LayoutFrame 2 0.0 236 0 160 0 258 0)
+ visibilityChannel: isApplicationDefinitionHolder
+ translateLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'IconFileNameEntryField'
+ layout: (LayoutFrame 162 0.0 234 0 -2 1.0 256 0)
+ visibilityChannel: isApplicationDefinitionHolder
+ model: iconFileNameHolder
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
+ )
+ )
- )
+ )
)
!
@@ -1447,23 +1447,6 @@
"Created: / 04-09-2006 / 18:01:22 / cg"
!
-iconFilenameHolder
- "automatically generated by UIPainter ..."
-
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
- "*** (and replace this comment by something more useful ;-)"
-
- iconFilenameHolder isNil ifTrue:[
- iconFilenameHolder := ValueHolder new.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
-"/ iconFilenameHolder addDependent:self.
-"/ iconFilenameHolder onChangeSend:#iconFilenameHolderChanged to:self.
- ].
- ^ iconFilenameHolder.
-!
-
isApplicationDefinitionHolder
isApplicationDefinitionHolder isNil ifTrue:[
isApplicationDefinitionHolder := false asValue