--- a/BrowserView.st Fri Aug 30 01:52:17 1996 +0200
+++ b/BrowserView.st Fri Aug 30 18:52:08 1996 +0200
@@ -137,6 +137,15 @@
update:something with:someArgument from:changedObject
|list selector oldMethod|
+ (changedObject == ObjectMemory) ifTrue:[
+ (something == #earlyRestart
+ or:[something == #restarted
+ or:[something == #returnFromSnapshot]]) ifTrue:[
+ "/ those are to be ignored.
+ ^ self
+ ]
+ ].
+
"
avoid update/warn after my own changes
"
@@ -347,7 +356,7 @@
(changedObject isMethod) ifTrue:[
]
- "Modified: 8.2.1996 / 20:41:05 / cg"
+ "Modified: 30.8.1996 / 18:50:39 / cg"
! !
!BrowserView methodsFor:'class category list menu'!
@@ -7372,6 +7381,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.161 1996-08-19 22:20:03 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.162 1996-08-30 16:52:08 cg Exp $'
! !
BrowserView initialize!