Changeset 200


Ignore:
Timestamp:
Aug 19, 2002, 1:25:25 AM (18 years ago)
Author:
landonf (Landon Fuller)
Message:

Add 0-9 to variable name regexp

Location:
trunk/base
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/Install/darwinports1.0/darwinports.tcl

    r190 r200  
    8484
    8585        foreach opt $options {
    86                 if {[regexp {([A-Za-z_\.]+)=(.+)} $opt match key val] == 1} {
     86                if {[regexp {([A-Za-z0-9_\.]+)=(.+)} $opt match key val] == 1} {
    8787                        $workername eval set user_options($key) \"$val\"
    8888                        $workername eval set $key \"$val\"
  • trunk/base/bin/portbuild

    r187 r200  
    3030                        set target [lindex $argv $i]
    3131                }
    32                 {[A-Za-z_\.]+=.+} {
    33                         if {[regexp {([A-Za-z_\.]+)=(.+)} [lindex $argv $i] match key val] == 1} {
     32                {[A-Za-z0-9_\.]+=.+} {
     33                        if {[regexp {([A-Za-z0-9_\.]+)=(.+)} [lindex $argv $i] match key val] == 1} {
    3434                                lappend options [lindex $argv $i]
    3535                        }
Note: See TracChangeset for help on using the changeset viewer.