changeset 1791 | 2bc8227a8b18 |
parent 1584 | 51c53d6656f4 |
child 2131 | 493983865076 |
--- a/SnapShotImage.st Fri Feb 13 12:34:50 2004 +0100 +++ b/SnapShotImage.st Mon Feb 16 11:25:04 2004 +0100 @@ -164,6 +164,13 @@ self fetchGlobals ]. globals keysAndValuesDo:aTwoArgBlock +! + +keysDo:aTwoArgBlock + globals isNil ifTrue:[ + self fetchGlobals + ]. + globals keysDo:aTwoArgBlock ! ! !SnapShotImage class methodsFor:'documentation'!