--- a/UIPainter.st	Wed Oct 29 18:07:48 1997 +0100
+++ b/UIPainter.st	Wed Oct 29 19:03:07 1997 +0100
@@ -1557,22 +1557,6 @@
             self accept
         ]
     ]
-!
-
-setMaxExtent
-    "set the windows maxExtent from its current extent"
-
-    self painter setMaxExtent
-
-    "Modified: / 27.10.1997 / 03:22:58 / cg"
-!
-
-setMinExtent
-    "set the windows minExtent from its current extent"
-
-    self painter setMinExtent
-
-    "Modified: / 27.10.1997 / 03:23:10 / cg"
 ! !
 
 !UIPainter methodsFor:'aspects'!
@@ -2635,11 +2619,15 @@
     self isModified ifTrue:[
         (self confirm:'accept change made in ' , tabSelection printString , ' section ?') ifTrue:[
             self accept.
-            self painter isModified ifTrue:[
+            "/  "XXX must be fixed - canvas changes are not recorded in the history
+            "/  so isModified returns false here
+            "/
+            "/ self painter isModified ifTrue:[
+            "/
                 (self confirm:'reinstall the new spec ?' withCRs) ifTrue:[
                     self doInstallSpec
                 ]
-            ].
+            "/ ].
         ]
     ].
     self painter isModified ifTrue:[
@@ -2673,7 +2661,7 @@
     ].        
     app openInterface:specSelector
 
-    "Modified: / 26.10.1997 / 22:57:30 / cg"
+    "Modified: / 29.10.1997 / 19:01:50 / cg"
 !
 
 doWindowSpec