--- a/Tools__ChangeSetSelectionDialog.st Fri Aug 03 14:47:21 2012 +0100
+++ b/Tools__ChangeSetSelectionDialog.st Fri Aug 03 16:14:04 2012 +0100
@@ -230,6 +230,37 @@
)
!
+editorSpecForExplicit
+ "This resource specification was automatically generated
+ by the UIPainter of ST/X."
+
+ "Do not manually edit this!! If it is corrupted,
+ the UIPainter may not be able to read the specification."
+
+ "
+ UIPainter new openOnClass:Tools::ChangeSetSelectionDialog andSelector:#editorSpecForExplicit
+ Tools::ChangeSetSelectionDialog new openInterface:#editorSpecForExplicit
+ "
+
+ <resource: #canvas>
+
+ ^
+ #(FullSpec
+ name: 'editorSpecForExplicit'
+ window:
+ (WindowSpec
+ label: 'ChangeSet Spec Editor'
+ name: 'ChangeSet Spec Editor'
+ min: (Point 10 10)
+ bounds: (Rectangle 0 0 441 310)
+ )
+ component:
+ (SpecCollection
+ collection: ()
+ )
+ )
+!
+
editorSpecForFile
"This resource specification was automatically generated
by the UIPainter of ST/X."
@@ -352,11 +383,10 @@
(if this app is embedded in a subCanvas)."
^ #(
+ #enabledHolder
#specHolder
- #enabledHolder
).
- "Modified: / 19-03-2012 / 23:22:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!ChangeSetSelectionDialog methodsFor:'actions'!
@@ -477,13 +507,6 @@
specLabelList
<resource: #uiAspect>
- "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 ;-)"
-
specLabelList isNil ifTrue:[
specLabelList := List withAll:
(ChangeSetSpec specClasses collect:[:cls|cls label])
@@ -600,5 +623,5 @@
!
version_SVN
- ^ '$Id: Tools__ChangeSetSelectionDialog.st 7946 2012-03-20 12:36:40Z vranyj1 $'
+ ^ '$Id: Tools__ChangeSetSelectionDialog.st 8036 2012-08-03 15:14:04Z vranyj1 $'
! !