libc-version.patch

   1 --- tcl8.5.13/library/platform/platform.tcl.orig        2012-11-06 16:04:59.000000000 +0100
   2 +++ tcl8.5.13/library/platform/platform.tcl     2013-01-01 14:14:42.116858289 +0100
   3 @@ -256,7 +256,7 @@
   4      if {![catch {
   5         set vdata [lindex [split [exec $libc] \n] 0]
   6      }]} {
   7 -       regexp {version ([0-9]+(\.[0-9]+)*)} $vdata -> v
   8 +       regexp {version ([0-9]+(\.[0-9]+)*), by } $vdata -> v
   9         foreach {major minor} [split $v .] break
  10         set v glibc${major}.${minor}
  11         return 1