Mercurial Mercurial > hg > stx-libtool2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Stream streamErrorSignal -> StreamError
authorStefan Vogel <sv@exept.de>
Wed, 14 May 2003 13:06:43 +0200
changeset 1722 517efee14b0d
parent 1721 9c2fba503547
child 1723 30d20151ed81
Stream streamErrorSignal -> StreamError #valueNowOrOnUnwindDo: -> #ensure:
MenuEditor.st file | annotate | diff | comparison | revisions 
--- 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
 ! !
hg/stx-libtool2