1#!/usr/local/bin/tclsh 2 3set CTMname ports-cur 4set CTMref /usr/ports 5set CTMdont {\.core$|/CVS$|/CVS/|^/distfiles|/#cvs|/\.#} 6 7