diff -r 9c2fba503547 -r 517efee14b0d MenuEditor.st --- 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 ! !