Ignore:
Timestamp:
Oct 23, 2007, 8:46:00 AM (10 years ago)
Author:
afb@…
Message:

fix bug with empty env variables (#12885, #11895)

File:
1 edited

Legend:

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

    r29695 r30273  
    557557                }
    558558       
    559                 while {[regexp "^(?: *)(\[^= \]+)=(\"|'|)(\[^\"'\].*?)\\2(?: +|$)(.*)$" ${the_environment} matchVar key delimiter value remaining]} {
     559                while {[regexp "^(?: *)(\[^= \]+)=(\"|'|)(\[^\"'\]*?)\\2(?: +|$)(.*)$" ${the_environment} matchVar key delimiter value remaining]} {
    560560                        set the_environment ${remaining}
    561561                        set ${command}.env_array(${key}) ${value}
Note: See TracChangeset for help on using the changeset viewer.