Ticket #16336: base_src_port1.0_portdepends.tcl.diff
File base_src_port1.0_portdepends.tcl.diff, 566 bytes (added by blb@…, 16 years ago) |
---|
-
base/src/port1.0/portdepends.tcl
old new 48 48 set { 49 49 foreach depspec $value { 50 50 switch -regex $depspec { 51 ^(lib|bin|path):([-A-Za-z0-9_/.${}^?+()|\\\\]+):([-._A-Za-z0-9 ]+)$ {}52 ^(port):([-._A-Za-z0-9 ]+)$ {}51 ^(lib|bin|path):([-A-Za-z0-9_/.${}^?+()|\\\\]+):([-._A-Za-z0-9|]+)$ {} 52 ^(port):([-._A-Za-z0-9|]+)$ {} 53 53 default { return -code error [format [msgcat::mc "invalid depspec: %s"] $depspec] } 54 54 } 55 55 }