Changeset 8483


Ignore:
Timestamp:
Sep 28, 2004, 4:00:10 PM (15 years ago)
Author:
rshaw
Message:

Merge Will's change from HEAD for direct mode file registry bug.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/rshaw-archivemode/base/src/registry1.0/receipt_flat.tcl

    r8479 r8483  
    11# receipt_flat.tcl
    2 # $Id: receipt_flat.tcl,v 1.2.2.2 2004/09/28 15:27:13 rshaw Exp $
     2# $Id: receipt_flat.tcl,v 1.2.2.3 2004/09/28 16:00:10 rshaw Exp $
    33#
    44# Copyright (c) 2004 Will Barton <wbb4@opendarwin.org>
     
    614614        }
    615615
    616         foreach file $files {
    617                 #if { [file type $file] == "link" } {
    618                 #       ui_debug "Adding link to file_map: $file for: $port"
    619                 #} else {
    620                 #       ui_debug "Adding file to file_map: $file for: $port"
    621                 #}
     616        foreach f $files {
     617                set file [lindex $f 0]
     618                if { [file type $file] == "link" } {
     619                        ui_debug "Adding link to file_map: $file for: $port"
     620                } else {
     621                        ui_debug "Adding file to file_map: $file for: $port"
     622                }
    622623                filemap set file_map $file $port
    623624        }
Note: See TracChangeset for help on using the changeset viewer.