Please add tests for this, starting with default procedure and then for specific control. Note that you could test context properties too, not just return value.