--- a/UIPainter.st	Tue Jan 10 14:32:38 2006 +0100
+++ b/UIPainter.st	Tue Jan 10 22:01:26 2006 +0100
@@ -2396,6 +2396,10 @@
     ^ self painter hasUndoHistory
 !
 
+hasUndoHistoryHolder
+    ^ self painter hasUndoHistoryHolder
+!
+
 helpIcon
 
     ^Icon helpIcon