# HG changeset patch # User Claus Gittinger # Date 935144443 -7200 # Node ID 1164de5147ea215a8621bca2ebedb8cc2eda1b58 # Parent a4ffb45a53eaacbb6af631f3a38c16c4f0d31a78 update methodList on methodPackage changes diff -r a4ffb45a53ea -r 1164de5147ea BrowserView.st --- a/BrowserView.st Fri Aug 20 12:14:35 1999 +0200 +++ b/BrowserView.st Fri Aug 20 12:20:43 1999 +0200 @@ -1155,19 +1155,19 @@ |argList sensor| (changedObject == ObjectMemory) ifTrue:[ - (something == #earlyRestart - or:[something == #restarted - or:[something == #returnFromSnapshot]]) ifTrue:[ - "/ those are to be ignored. - ^ self - ] + (something == #earlyRestart + or:[something == #restarted + or:[something == #returnFromSnapshot]]) ifTrue:[ + "/ those are to be ignored. + ^ self + ] ]. "/ "/ avoid update/warn after my own changes "/ lockUpdates == true ifTrue:[ - ^ self + ^ self ]. "/ @@ -1180,7 +1180,7 @@ (LabelAndIcon isLoaded not or:[(sensor := self sensor) isNil]) ifTrue:[ - ^ self delayedUpdate:something with:someArgument from:changedObject + ^ self delayedUpdate:something with:someArgument from:changedObject ]. "/ @@ -1188,19 +1188,19 @@ "/ Otherwise push it as an event, to be handled when I am back "/ argList := Array with:something - with:someArgument - with:changedObject. + with:someArgument + with:changedObject. (sensor - hasEvent:#delayedUpdate:with:from: - for:self - withArguments:argList) ifTrue:[ - ^ self + hasEvent:#delayedUpdate:with:from: + for:self + withArguments:argList) ifTrue:[ + ^ self ]. sensor - pushUserEvent:#delayedUpdate:with:from: - for:self - withArguments:argList + pushUserEvent:#delayedUpdate:with:from: + for:self + withArguments:argList "Modified: 26.3.1997 / 18:29:51 / cg" ! ! @@ -13698,6 +13698,6 @@ !BrowserView class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.541 1999-08-18 15:13:27 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.542 1999-08-20 10:20:43 cg Exp $' ! ! BrowserView initialize! diff -r a4ffb45a53ea -r 1164de5147ea BrwsrView.st --- a/BrwsrView.st Fri Aug 20 12:14:35 1999 +0200 +++ b/BrwsrView.st Fri Aug 20 12:20:43 1999 +0200 @@ -1155,19 +1155,19 @@ |argList sensor| (changedObject == ObjectMemory) ifTrue:[ - (something == #earlyRestart - or:[something == #restarted - or:[something == #returnFromSnapshot]]) ifTrue:[ - "/ those are to be ignored. - ^ self - ] + (something == #earlyRestart + or:[something == #restarted + or:[something == #returnFromSnapshot]]) ifTrue:[ + "/ those are to be ignored. + ^ self + ] ]. "/ "/ avoid update/warn after my own changes "/ lockUpdates == true ifTrue:[ - ^ self + ^ self ]. "/ @@ -1180,7 +1180,7 @@ (LabelAndIcon isLoaded not or:[(sensor := self sensor) isNil]) ifTrue:[ - ^ self delayedUpdate:something with:someArgument from:changedObject + ^ self delayedUpdate:something with:someArgument from:changedObject ]. "/ @@ -1188,19 +1188,19 @@ "/ Otherwise push it as an event, to be handled when I am back "/ argList := Array with:something - with:someArgument - with:changedObject. + with:someArgument + with:changedObject. (sensor - hasEvent:#delayedUpdate:with:from: - for:self - withArguments:argList) ifTrue:[ - ^ self + hasEvent:#delayedUpdate:with:from: + for:self + withArguments:argList) ifTrue:[ + ^ self ]. sensor - pushUserEvent:#delayedUpdate:with:from: - for:self - withArguments:argList + pushUserEvent:#delayedUpdate:with:from: + for:self + withArguments:argList "Modified: 26.3.1997 / 18:29:51 / cg" ! ! @@ -13698,6 +13698,6 @@ !BrowserView class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.541 1999-08-18 15:13:27 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.542 1999-08-20 10:20:43 cg Exp $' ! ! BrowserView initialize!