Changeset 14529 for trunk/base


Ignore:
Timestamp:
Oct 10, 2005, 1:51:36 PM (18 years ago)
Author:
pguyot (Paul Guyot)
Message:

Allow {} in depspecs.

File:
1 edited

Legend:

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

    r13738 r14529  
    11# et:ts=4
    22# portdepends.tcl
    3 # $Id: portdepends.tcl,v 1.42 2005/08/27 00:07:30 pguyot Exp $
     3# $Id: portdepends.tcl,v 1.43 2005/10/10 13:51:36 pguyot Exp $
    44#
    55# Copyright (c) 2002 - 2003 Apple Computer, Inc.
     
    4949                        foreach depspec $args {
    5050                                switch -regex $depspec {
    51                                         (lib|bin|path):([-A-Za-z0-9_/.$^?+()|\\\\]+):([-A-Za-z./0-9_]+) {}
     51                                        (lib|bin|path):([-A-Za-z0-9_/.${}^?+()|\\\\]+):([-A-Za-z./0-9_]+) {}
    5252                                        (port):([-A-Za-z./0-9_]+) {}
    5353                                        default { return -code error [format [msgcat::mc "invalid depspec: %s"] $depspec] }
Note: See TracChangeset for help on using the changeset viewer.