[91726] trunk/base/src/macports1.0/macports.tcl
jmr at macports.org
jmr at macports.org
Mon Apr 9 00:07:48 PDT 2012
Revision: 91726
https://trac.macports.org/changeset/91726
Author: jmr at macports.org
Date: 2012-04-09 00:07:45 -0700 (Mon, 09 Apr 2012)
Log Message:
-----------
don't mess with the global options in revupgrade_scanandrebuild, and don't explicitly specify the existing variants when upgrading, since they get used automatically
Modified Paths:
--------------
trunk/base/src/macports1.0/macports.tcl
Modified: trunk/base/src/macports1.0/macports.tcl
===================================================================
--- trunk/base/src/macports1.0/macports.tcl 2012-04-09 06:36:01 UTC (rev 91725)
+++ trunk/base/src/macports1.0/macports.tcl 2012-04-09 07:07:45 UTC (rev 91726)
@@ -4424,37 +4424,24 @@
# shared depscache for all ports that are going to be rebuilt
array set depscache {}
set status 0
+ array set my_options [array get macports::global_options]
foreach port $topsort_ports {
if {![info exists depscache(port:[$port name])]} {
-
- # convert variations into the format macports::upgrade needs
- set minusvariant [lrange [split [$port negated_variants] "-"] 1 end]
- set plusvariant [lrange [split [$port variants] "+"] 1 end]
- set variants [list]
- foreach v $minusvariant {
- lappend variants $v "-"
- }
- foreach v $plusvariant {
- lappend variants $v "+"
- }
- array unset variations
- array set variations $variants
-
# set rev-upgrade options and nodeps if this is not the first run
- set macports::global_options(ports_revupgrade) "yes"
- unset -nocomplain macports::global_options(ports_nodeps)
- unset -nocomplain macports::global_options(ports_revupgrade_second_run)
- unset -nocomplain macports::global_options(ports_source_only)
+ set my_options(ports_revupgrade) "yes"
+ unset -nocomplain my_options(ports_nodeps)
+ unset -nocomplain my_options(ports_revupgrade_second_run)
+ unset -nocomplain my_options(ports_source_only)
if {$broken_port_counts([$port name]) > 1} {
- set macports::global_options(ports_revupgrade_second_run) yes
- set macports::global_options(ports_nodeps) yes
+ set my_options(ports_revupgrade_second_run) yes
+ set my_options(ports_nodeps) yes
# build from source only until the buildbot has some method of rev-upgrade, too
- set macports::global_options(ports_source_only) yes
+ set my_options(ports_source_only) yes
}
# call macports::upgrade with ports_revupgrade option to rebuild the port
set status [macports::upgrade [$port name] "port:[$port name]" \
- [array get variations] [array get macports::global_options] depscache]
+ {} [array get my_options] depscache]
ui_debug "Rebuilding port [$port name] finished with status $status"
if {$status != 0} {
error "Error rebuilding [$port name]"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20120409/4157e0fb/attachment.html>
More information about the macports-changes
mailing list