Move this test into the pen.

Spotted by:	fgs