Changeset 996 for trunk/base


Ignore:
Timestamp:
Oct 8, 2002, 10:34:37 PM (18 years ago)
Author:
kevin
Message:

Recognize portnames with a '-'.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/portdepends.tcl

    r929 r996  
    5252        set|append {
    5353            foreach depspec $args {
    54                 if {[regexp {([A-Za-z\./0-9]+):([A-Za-z0-9\-\.$^\?\+\(\)\|\\]+):([A-Za-z\./0-9]+)} "$depspec" match deppath depregex portname] == 1} {
     54                if {[regexp {([A-Za-z\./0-9]+):([A-Za-z0-9\-\.$^\?\+\(\)\|\\]+):([-A-Za-z\./0-9]+)} "$depspec" match deppath depregex portname] == 1} {
    5555                    switch $deppath {
    5656                        lib { set obj [libportfile_new $portname $depregex] }
Note: See TracChangeset for help on using the changeset viewer.