Revision: 81398 http://trac.macports.org/changeset/81398 Author: fotanus@macports.org Date: 2011-07-29 19:33:58 -0700 (Fri, 29 Jul 2011) Log Message: ----------- removed orphaned functions Modified Paths: -------------- branches/gsoc11-post-destroot/base/src/port1.0/portcheckdestroot.tcl Modified: branches/gsoc11-post-destroot/base/src/port1.0/portcheckdestroot.tcl =================================================================== --- branches/gsoc11-post-destroot/base/src/port1.0/portcheckdestroot.tcl 2011-07-30 02:31:44 UTC (rev 81397) +++ branches/gsoc11-post-destroot/base/src/port1.0/portcheckdestroot.tcl 2011-07-30 02:33:58 UTC (rev 81398) @@ -36,11 +36,6 @@ } -# escape chars in order to be usable as regexp. This function is for internal use. -proc portcheckdestroot::escape_chars {str} { - return [regsub -all {\W} $str {\\&}] -} - # List all links on a directory recursively. This function is for internal use. proc portcheckdestroot::links_list {dir} { return [types_list $dir "l"]