diff -r 55154d7a4deb -r 10683a97de93 UIPainter.st --- 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