--- a/extensions.st	Fri Feb 08 21:35:50 2013 +0100
+++ b/extensions.st	Fri Feb 08 21:41:17 2013 +0100
@@ -1137,6 +1137,24 @@
     self retractInterestsForWhich:[:i | i aspect == aspect ]
 ! !
 
+!Object methodsFor:'Compatibility-Dolphin'!
+
+trigger:anAspect
+    self changed:anAspect
+! !
+
+!Object methodsFor:'Compatibility-Dolphin'!
+
+trigger:anAspect with:anArgument
+    self changed:anAspect with:anArgument
+! !
+
+!Object methodsFor:'dependents-st/v event simulation'!
+
+triggerEvent:aSymbol
+    self changed:aSymbol
+! !
+
 !Object methodsFor:'dependents-st/v event simulation'!
 
 triggerEvent:eventSymbol with:aParameter
@@ -1207,6 +1225,12 @@
     "
 ! !
 
+!Object methodsFor:'Compatibility-Dolphin'!
+
+when:anAspect sendTo:anObject
+    self expressInterestIn:anAspect for:anObject sendBack:anAspect
+! !
+
 !Stream methodsFor:'stacked computing streams'!
 
 collecting:aBlock
@@ -1228,5 +1252,5 @@
 !stx_libbasic2 class methodsFor:'documentation'!
 
 extensionsVersion_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/extensions.st,v 1.21 2013-02-08 17:25:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/extensions.st,v 1.22 2013-02-08 20:41:17 cg Exp $'
 ! !
\ No newline at end of file