Upgrade function broken in MacPorts 1.8.0

[ogoell@…]

$ which port

/usr/local/bin/port

$ port --version MacPorts 1.8.0 Entering interactive mode... ("help" for help, "quit" to quit)

$ sudo port -fv upgrade outdated wrong # args: should be "macports::upgrade portname dspec globalvarlist variationslist optionslist ?depscachename?"

while executing

"macports::upgrade $portname "port:$portname" [array get variations] [array get options]"

("uplevel" body line 9) invoked from within

"uplevel 1 $block"

(procedure "foreachport" line 16) invoked from within

"foreachport $portlist {

# Merge global variations into the variations specified for this port foreach { variation value } [array get global_variat..."

(procedure "action_upgrade" line 4) invoked from within

"$action_proc $action $portlist [array get global_options]"

(procedure "process_cmd" line 58) invoked from within

"process_cmd $remaining_args"

invoked from within

"if { [llength $remaining_args] > 0 } {

# If there are remaining arguments, process those as a command

# Exit immediately, by default, unless we'r..."

(file "/usr/local/bin/port" line 2661)