--- a/ToolApplicationModel.st	Mon Oct 30 04:34:51 2017 +0000
+++ b/ToolApplicationModel.st	Fri Nov 10 00:18:45 2017 +0100
@@ -499,60 +499,63 @@
     <resource: #canvas>
 
     ^ 
-     #(#FullSpec
-        #name: #windowSpecForCommit
-        #window: 
-       #(#WindowSpec
-          #label: 'Commit Buttons'
-          #name: 'Commit Buttons'
-          #min: #(#Point 100 22)
-          #max: #(#Point 1152 900)
-          #bounds: #(#Rectangle 18 51 318 111)
-        )
-        #component: 
-       #(#SpecCollection
-          #collection: #(
-           #(#HorizontalPanelViewSpec
-              #name: 'HorizontalPanel1'
-              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              #horizontalLayout: #fitSpace
-              #verticalLayout: #centerMax
-              #horizontalSpace: 3
-              #verticalSpace: 3
-              #reverseOrderIfOKAtLeft: true
-              #component: 
-             #(#SpecCollection
-                #collection: #(
-                 #(#ActionButtonSpec
-                    #label: 'Cancel'
-                    #name: 'cancelButton'
-                    #activeHelpKey: #commitCancel
-                    #translateLabel: true
-                    "/ #resizeForLabel: true
-                    #tabable: true
-                    #model: #cancel
-                    #enableChannel: #enablingCommitButtonsHolder
-                    #useDefaultExtent: true
-                  )
-                 #(#ActionButtonSpec
-                    #label: 'OK'
-                    #name: 'okButton'
-                    #activeHelpKey: #commitOK
-                    #translateLabel: true
-                    "/ #resizeForLabel: true
-                    #tabable: true
-                    #model: #accept
-                    #enableChannel: #enablingCommitButtonsHolder
-                    #useDefaultExtent: true
-                  )
+    #(FullSpec
+       name: windowSpecForCommit
+       uuid: '443e7e20-c5a3-11e7-82f7-c42c033b4871'
+       window: 
+      (WindowSpec
+         label: 'Commit Buttons'
+         name: 'Commit Buttons'
+         uuid: '443e85f0-c5a3-11e7-82f7-c42c033b4871'
+         min: (Point 100 22)
+         max: (Point 1152 900)
+         bounds: (Rectangle 0 0 300 60)
+       )
+       component: 
+      (SpecCollection
+         collection: (
+          (HorizontalPanelViewSpec
+             name: 'HorizontalPanel1'
+             layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+             uuid: '443e8d2a-c5a3-11e7-82f7-c42c033b4871'
+             horizontalLayout: fitSpace
+             verticalLayout: centerMax
+             horizontalSpace: 3
+             verticalSpace: 3
+             reverseOrderIfOKAtLeft: true
+             component: 
+            (SpecCollection
+               collection: (
+                (ActionButtonSpec
+                   label: 'Cancel'
+                   name: 'cancelButton'
+                   activeHelpKey: commitCancel
+                   uuid: '443e93e2-c5a3-11e7-82f7-c42c033b4871'
+                   translateLabel: true
+                   tabable: true
+                   model: cancel
+                   enableChannel: enablingCommitButtonsHolder
+                   useDefaultExtent: true
                  )
-               
-              )
-            )
+                (ActionButtonSpec
+                   label: 'OK'
+                   name: 'okButton'
+                   activeHelpKey: commitOK
+                   uuid: '443e9bda-c5a3-11e7-82f7-c42c033b4871'
+                   translateLabel: true
+                   tabable: true
+                   model: accept
+                   enableChannel: enablingCommitButtonsHolder
+                   useDefaultExtent: true
+                 )
+                )
+              
+             )
            )
-         
-        )
-      )
+          )
+        
+       )
+     )
 !
 
 windowSpecForCommitWithoutChannels
@@ -570,57 +573,62 @@
     <resource: #canvas>
 
     ^ 
-     #(FullSpec
-        name: windowSpecForCommitWithoutChannels
-        window: 
-       (WindowSpec
-          label: 'Commit Buttons Without Channels'
-          name: 'Commit Buttons Without Channels'
-          min: (Point 100 22)
-          max: (Point 1152 900)
-          bounds: (Rectangle 0 0 300 46)
-        )
-        component: 
-       (SpecCollection
-          collection: (
-           (HorizontalPanelViewSpec
-              name: 'HorizontalPanel1'
-              layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              horizontalLayout: fitSpace
-              verticalLayout: centerMax
-              horizontalSpace: 3
-              verticalSpace: 3
-              reverseOrderIfOKAtLeft: true
-              component: 
-             (SpecCollection
-                collection: (
-                 (ActionButtonSpec
-                    label: 'Cancel'
-                    name: 'cancelButton'
-                    activeHelpKey: commitCancel
-                    translateLabel: true
-                    tabable: true
-                    model: cancel
-                    useDefaultExtent: true
-                  )
-                 (ActionButtonSpec
-                    label: 'OK'
-                    name: 'okButton'
-                    activeHelpKey: commitOK
-                    translateLabel: true
-                    tabable: true
-                    model: accept
-                    isDefault: true
-                    useDefaultExtent: true
-                  )
+    #(FullSpec
+       name: windowSpecForCommitWithoutChannels
+       uuid: '46ec2a78-c5a3-11e7-82f7-c42c033b4871'
+       window: 
+      (WindowSpec
+         label: 'Commit Buttons Without Channels'
+         name: 'Commit Buttons Without Channels'
+         uuid: '46ec2e6a-c5a3-11e7-82f7-c42c033b4871'
+         min: (Point 100 22)
+         max: (Point 1152 900)
+         bounds: (Rectangle 0 0 300 46)
+       )
+       component: 
+      (SpecCollection
+         collection: (
+          (HorizontalPanelViewSpec
+             name: 'HorizontalPanel1'
+             layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+             uuid: '46ec316c-c5a3-11e7-82f7-c42c033b4871'
+             horizontalLayout: fitSpace
+             verticalLayout: centerMax
+             horizontalSpace: 3
+             verticalSpace: 3
+             reverseOrderIfOKAtLeft: true
+             component: 
+            (SpecCollection
+               collection: (
+                (ActionButtonSpec
+                   label: 'Cancel'
+                   name: 'cancelButton'
+                   activeHelpKey: commitCancel
+                   uuid: '46ec3450-c5a3-11e7-82f7-c42c033b4871'
+                   translateLabel: true
+                   tabable: true
+                   model: cancel
+                   useDefaultExtent: true
                  )
-               
-              )
-            )
+                (ActionButtonSpec
+                   label: 'OK'
+                   name: 'okButton'
+                   activeHelpKey: commitOK
+                   uuid: '46ec3798-c5a3-11e7-82f7-c42c033b4871'
+                   translateLabel: true
+                   tabable: true
+                   model: accept
+                   isDefault: true
+                   useDefaultExtent: true
+                 )
+                )
+              
+             )
            )
-         
-        )
-      )
+          )
+        
+       )
+     )
 !
 
 windowSpecForInfoBar
@@ -638,41 +646,46 @@
     <resource: #canvas>
 
     ^ 
-     #(#FullSpec
-        #name: #windowSpecForInfoBar
-        #window: 
-       #(#WindowSpec
-          #label: 'Info Bar'
-          #name: 'Info Bar'
-          #min: #(#Point 400 320)
-          #max: #(#Point 1152 900)
-          #bounds: #(#Rectangle 13 23 513 369)
-        )
-        #component: 
-       #(#SpecCollection
-          #collection: #(
-           #(#ViewSpec
-              #name: 'infoView'
-              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              #component: 
-             #(#SpecCollection
-                #collection: #(
-                 #(#LabelSpec
-                    #name: 'InfoLabel'
-                    #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-                    #level: -1
-                    #labelChannel: #infoLabelHolder
-                    #resizeForLabel: false
-                    #adjust: #left
-                  )
+    #(FullSpec
+       name: windowSpecForInfoBar
+       uuid: '4969fb72-c5a3-11e7-82f7-c42c033b4871'
+       window: 
+      (WindowSpec
+         label: 'Info Bar'
+         name: 'Info Bar'
+         uuid: '496a0108-c5a3-11e7-82f7-c42c033b4871'
+         min: (Point 400 320)
+         max: (Point 1152 900)
+         bounds: (Rectangle 0 0 500 346)
+       )
+       component: 
+      (SpecCollection
+         collection: (
+          (ViewSpec
+             name: 'infoView'
+             layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+             uuid: '496a0568-c5a3-11e7-82f7-c42c033b4871'
+             component: 
+            (SpecCollection
+               collection: (
+                (LabelSpec
+                   name: 'InfoLabel'
+                   layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+                   uuid: '496a084c-c5a3-11e7-82f7-c42c033b4871'
+                   level: -1
+                   translateLabel: true
+                   labelChannel: infoLabelHolder
+                   resizeForLabel: false
+                   adjust: left
                  )
-               
-              )
-            )
+                )
+              
+             )
            )
-         
-        )
-      )
+          )
+        
+       )
+     )
 !
 
 windowSpecForInfoBarWithClock