my( $self, $new, $old ) = (shift, shift, shift);
return "can't change domain with Critical Path"
if $old->domain ne $new->domain;
my( $self, $new, $old ) = (shift, shift, shift);
return "can't change domain with Critical Path"
if $old->domain ne $new->domain;