… | |
… | |
216 | sub { $::PICKUP_ENABLE->toggle } |
216 | sub { $::PICKUP_ENABLE->toggle } |
217 | ], |
217 | ], |
218 | ); |
218 | ); |
219 | |
219 | |
220 | if ($::CONN && $::CONN->{editor_support}) { |
220 | if ($::CONN && $::CONN->{editor_support}) { |
221 | push @items, [ |
221 | # push @items, [ |
222 | "Edit this map <span size='xx-small'>(" . (DC::asxml $::CONN->{map_info}[0]) . ")</span>", |
222 | # "Edit this map <span size='xx-small'>(" . (DC::asxml $::CONN->{map_info}[0]) . ")</span>", |
223 | \&editor_invoke, |
223 | # \&editor_invoke, |
224 | ]; |
224 | # ]; |
225 | |
225 | |
226 | for my $type (qw(test name)) { |
226 | for my $type (qw(test name)) { |
227 | $::CONN->{editor_support}{type} ne $type |
227 | $::CONN->{editor_support}{type} ne $type |
228 | or next; |
228 | or next; |
229 | my $server = $::CONN->{editor_support}{"${type}server"} |
229 | my $server = $::CONN->{editor_support}{"${type}server"} |