# HG changeset patch
# User tz
# Date 888520893 -3600
# Node ID 788fe83ab3c081d86c002bbc35a32c0da2180506
# Parent  363d54091c9eeb2f9cb8e81dcf59de03de8e6797
time clock removed

diff -r 363d54091c9e -r 788fe83ab3c0 ImageEditor.st
--- a/ImageEditor.st	Thu Feb 26 20:19:30 1998 +0100
+++ b/ImageEditor.st	Thu Feb 26 20:21:33 1998 +0100
@@ -61,16 +61,16 @@
 
     "self openModalOnClass: self andSelector: #newImageIcon"
 
-    |imageEditor className resourceClassName resourceSelector|                      
+    |imageEditor imageEditView className resourceClassName resourceSelector|                      
     imageEditor := self new.
     aClass isClass ifTrue: [className := aClass name].
     aClass isString ifTrue: [className := aClass].      
 
-    imageEditor postOpenAction: [imageEditor loadFromOrPrepareForMessage: className, ' ', aSelector].
+    imageEditor postOpenAction: [imageEditView := imageEditor imageEditView. imageEditor loadFromOrPrepareForMessage: className, ' ', aSelector].
     imageEditor openModal.
 
-    resourceClassName := imageEditor valueOfResourceClass value.
-    resourceSelector := imageEditor valueOfResourceSelector value.
+    resourceClassName := imageEditView resourceClass.
+    resourceSelector := imageEditView resourceSelector.
 
     (className asString ~= resourceClassName) | (aSelector asString ~= resourceSelector)
         ifTrue: [^resourceClassName, ' ', resourceSelector]
@@ -271,11 +271,11 @@
           #window: 
            #(#WindowSpec
               #name: 'Image Editor'
-              #layout: #(#LayoutFrame 318 0 314 0 817 0 659 0)
+              #layout: #(#LayoutFrame 153 0 246 0 652 0 591 0)
               #label: 'Image Editor'
               #min: #(#Point 400 320)
               #max: #(#Point 1152 900)
-              #bounds: #(#Rectangle 318 314 818 660)
+              #bounds: #(#Rectangle 153 246 653 592)
               #menu: #menu
               #usePreferredExtent: false
           )
@@ -316,9 +316,14 @@
                                                    #(#SpecCollection
                                                       #collection: 
                                                        #(
+                                                         #(#MenuPanelSpec
+                                                            #name: 'MenuPanel1'
+                                                            #layout: #(#LayoutFrame 0 0.0 0 0 0 1.0 24 0)
+                                                            #menu: #menuMouseButtonColors
+                                                        )
                                                          #(#DataSetSpec
                                                             #name: 'colorDataSetView'
-                                                            #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -22 1.0)
+                                                            #layout: #(#LayoutFrame 0 0.0 26 0.0 0 1.0 0 1.0)
                                                             #activeHelpKey: #colorMapTable
                                                             #model: #selectionOfColor
                                                             #style: #(#FontDescription #helvetica #medium #roman 10)
@@ -353,11 +358,6 @@
                                                               )
                                                             )
                                                         )
-                                                         #(#MenuPanelSpec
-                                                            #name: 'MenuPanel1'
-                                                            #layout: #(#LayoutFrame 0 0.0 -22 1 0 1.0 0 1.0)
-                                                            #menu: #menuMouseButtonColors
-                                                        )
                                                       )
                                                   )
                                               )
@@ -369,11 +369,11 @@
                                                   #miniScrollerHorizontal: true
                                                   #miniScrollerVertical: true
                                                   #component: #ImageView
-                                                  #hasBorder: true
+                                                  #hasBorder: false
                                               )
                                             )
                                         )
-                                        #handles: #(#Any 0.5 1.0)
+                                        #handles: #(#Any 0.723776 1.0)
                                     )
                                   )
                               )
@@ -439,7 +439,7 @@
                     #name: 'infoBarSubSpec'
                     #layout: #(#LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
                     #majorKey: #ToolApplicationModel
-                    #minorKey: #windowSpecForInfoBarWithClock
+                    #minorKey: #windowSpecForInfoBar
                 )
               )
           )