Ignore:
Timestamp:
Oct 24, 2002, 6:38:54 PM (18 years ago)
Author:
jkh
Message:

Seat belt: If patchfiles is empty, simply return. This allows you to delete
all the entries out of a patchfiles list in a variant without causing
an internal error.

File:
1 edited

Legend:

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

    r1015 r1138  
    5050    global portname patchfiles distpath filedir workdir worksrcdir portpath UI_PREFIX
    5151
     52    # First make sure that patchfiles exists and isn't stubbed out.
    5253    if ![info exists patchfiles] {
    5354        return 0
     55    } elseif {[string length $patchfiles] == 0} {
     56        return 0
    5457    }
     58
    5559    foreach patch $patchfiles {
    5660        if [file exists $portpath/$filedir/$patch] {
Note: See TracChangeset for help on using the changeset viewer.