--- a/MenuEditor.st Wed May 07 17:18:38 2003 +0200
+++ b/MenuEditor.st Wed May 14 13:06:43 2003 +0200
@@ -2236,14 +2236,15 @@
withoutNotifyDo:aBlock
"evaluate the block; all change notifications are
- discard during the block is evaluated.
- "
+ discard during the block is evaluated"
+
|blockResult|
- [ notifyDisabledCounter := notifyDisabledCounter + 1.
- blockResult := aBlock value.
- ] valueNowOrOnUnwindDo:[
- notifyDisabledCounter := notifyDisabledCounter - 1
+ [
+ notifyDisabledCounter := notifyDisabledCounter + 1.
+ blockResult := aBlock value.
+ ] ensure:[
+ notifyDisabledCounter := notifyDisabledCounter - 1
].
^ blockResult
! !