# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1142843917 -3600
# Node ID 80ddafc474fbe89d2fc05a440600c9fc34a71998
# Parent  2df23da6484aeae7501b9f77b472e45ce07aec7a
isEmpty ifFalse -> notEmpty

diff -r 2df23da6484a -r 80ddafc474fb UIObjectView.st
--- a/UIObjectView.st	Tue Mar 14 20:03:57 2006 +0100
+++ b/UIObjectView.st	Mon Mar 20 09:38:37 2006 +0100
@@ -2506,7 +2506,7 @@
 
         aBlock value.
 
-        transaction isEmpty ifFalse:[
+        transaction notEmpty ifTrue:[
             identifier := identifier + 1.
             transaction identifier:identifier.
             history addLast:transaction.
@@ -2775,9 +2775,15 @@
 !UIObjectView::UndoHistory::Transaction methodsFor:'testing'!
 
 isEmpty
-    "returns true if no undo action is registered
-    "
+    "returns true if no undo action is registered"
+
     ^ actions isNil
+!
+
+notEmpty
+    "returns true if no undo action is registered"
+
+    ^ actions notNil
 ! !
 
 !UIObjectView class methodsFor:'documentation'!