Changeset 14543 for trunk/base


Ignore:
Timestamp:
Oct 11, 2005, 6:35:28 AM (15 years ago)
Author:
pguyot (Paul Guyot)
Message:

Fixed a typo.
Add a comment since the typo didn't really create any problem - it's purely
empirical, like most Tcl-coding experience :(

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port/portindex.tcl

    r14532 r14543  
    55# Traverse through all ports, creating an index and archiving port directories
    66# if requested
    7 # $Id: portindex.tcl,v 1.34 2005/10/10 14:23:55 pguyot Exp $
     7# $Id: portindex.tcl,v 1.35 2005/10/11 06:35:28 pguyot Exp $
    88
    99catch {source \
     
    111111        set prefix {\${prefix}}
    112112        array set portinfo [dportinfo $interp]
    113         set $prefix $save_prefix
     113        set prefix $save_prefix # the code currently doesn't need prefix to be
     114                                                        # correct, but let's revert it ASAP anyway.
    114115        dportclose $interp
    115116        set portinfo(portdir) $portdir
Note: See TracChangeset for help on using the changeset viewer.