Skip to content
Permalink
Browse files

Fix issue in port(1) with options and variants, broken by my checkin …

…this morning.

This showed up as options (like -f) not working. God, I hate tcl arrays.

Thanks for testing, Joe Autry!

git-svn-id: https://svn.macports.org/repository/macports/trunk/base@14563 d073be05-634f-4543-b044-5fe20cf6d1d6
  • Loading branch information
jdberry committed Oct 11, 2005
1 parent 600da70 commit 214c19a375b5da80196f0fb1af5740dfbe255d28
Showing with 3 additions and 3 deletions.
  1. +3 −3 src/port/port.tcl
@@ -2,7 +2,7 @@
#\
exec @TCLSH@ "$0" "$@"
# port.tcl
# $Id: port.tcl,v 1.120 2005/10/11 13:06:51 jberry Exp $
# $Id: port.tcl,v 1.121 2005/10/11 20:09:47 jberry Exp $
#
# Copyright (c) 2004 Robert Shaw <rshaw@opendarwin.org>
# Copyright (c) 2002 Apple Computer, Inc.
@@ -385,9 +385,9 @@ proc foreachport {portlist block} {
set portname $portspec(name)
set portversion $portspec(version)
array unset variations
array set variations [array get $portspec(variants)]
array set variations $portspec(variants)
array unset options
array set options [array get $portspec(options)]
array set options $portspec(options)
}
uplevel 1 $block
}

0 comments on commit 214c19a

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