A very simple module that builds wearable items into the game. To use, have garments inherit from "clothing_type". They will be set to be takeable, and when worn will appear in the inventory with "(being worn)" appended to the name. Check the attribute "being_worn" to determine if the item is being worn in a script.
This is up for people to try out and comment on. I have tried to make it easy for language support, but I am not sure what you do aboyt the commands themselves. It includes a very simple example (one room, two objects). See what you think.