asf - Revision 1922720: /tcl/websh/trunk/examples/shop