set s [parse-planet-spec $cmdr(gal-seed) $v]
if {[string equal $s ""]} { error "bad planet spec `$v'" }
if {![in-galaxy-p $cmdr(gal-seed) $s]} {
error "planet `[worldname $s]' not in galaxy $cmdr(gal-seed)"
}
elite-worldinfo p $s
set s [parse-planet-spec $cmdr(gal-seed) $v]
if {[string equal $s ""]} { error "bad planet spec `$v'" }
if {![in-galaxy-p $cmdr(gal-seed) $s]} {
error "planet `[worldname $s]' not in galaxy $cmdr(gal-seed)"
}
elite-worldinfo p $s