Moved code to macports1.0/cleanup.tcl and registered new command, 'port cleanup' in port.tcl