First, it needs ObjectAsMethodWrapper, which is not any more in the 1.4 image :)

Second, ObjectAsMethodWrapper uses MethodReference, causing an infinite recursion when installing the mirror.� I fixed this changing the method #on:selector:� by

on: aClass selector: aSelector
��� ^self on: (RGMethodDefinition class: aClass selector: aSelector)

Guille