Skip to content
Permalink
Browse files

I should have tested such an obvious change.

git-svn-id: https://svn.macports.org/repository/macports/trunk/base@14545 d073be05-634f-4543-b044-5fe20cf6d1d6
  • Loading branch information
pguyot committed Oct 11, 2005
1 parent 7b41013 commit bb340809da644c76faf5670fb99d74b98063f5de
Showing with 4 additions and 3 deletions.
  1. +4 −3 src/port/portindex.tcl
@@ -4,7 +4,7 @@ exec @TCLSH@ "$0" "$@"

# Traverse through all ports, creating an index and archiving port directories
# if requested
# $Id: portindex.tcl,v 1.35 2005/10/11 06:35:28 pguyot Exp $
# $Id: portindex.tcl,v 1.36 2005/10/11 07:22:03 pguyot Exp $

catch {source \
[file join "@TCL_PACKAGE_DIR@" darwinports1.0 darwinports_fastload.tcl]}
@@ -110,8 +110,9 @@ proc pindex {portdir} {
set save_prefix $prefix
set prefix {\${prefix}}
array set portinfo [dportinfo $interp]
set prefix $save_prefix # the code currently doesn't need prefix to be
# correct, but let's revert it ASAP anyway.
set prefix $save_prefix
# the code currently doesn't need prefix to be correct, but let's
# revert it ASAP anyway.
dportclose $interp
set portinfo(portdir) $portdir
puts "Adding port $portdir"

0 comments on commit bb34080

Please sign in to comment.
You can’t perform that action at this time.