UIObjectView.st
changeset 1521 2efd2b9419c4
parent 1500 36c0b4b268b8
child 1555 4ecde43a73d6
--- a/UIObjectView.st	Tue Oct 30 15:47:54 2001 +0100
+++ b/UIObjectView.st	Tue Oct 30 15:48:17 2001 +0100
@@ -2564,6 +2564,16 @@
 
 !UIObjectView::UndoHistory methodsFor:'undo'!
 
+labelOfLastUndo
+    "return astring describing the last undo-action (for the menu)"
+
+    history size = 0 ifTrue:[^ '* nothing to undo *'].
+    ^ history last "actions" type
+
+    "Created: / 30.10.2001 / 13:45:28 / cg"
+    "Modified: / 30.10.2001 / 13:46:33 / cg"
+!
+
 undoLast:nTransactions
     "undo last n transactions; an open transaction will be closed;
      transactions during undo are disabled