Copied newer version from sample TEA extension
Authored by: wart 1999-09-18
Parent: [r30]
Child: [r32]