… | |
… | |
194 | |
194 | |
195 | on_button_down => $button_cb, |
195 | on_button_down => $button_cb, |
196 | on_tooltip_show => sub { |
196 | on_tooltip_show => sub { |
197 | my ($widget) = @_; |
197 | my ($widget) = @_; |
198 | |
198 | |
199 | $::CONN->ex ($self->{tag}, sub { |
199 | $::CONN && $::CONN->ex ($self->{tag}, sub { |
200 | my ($long_desc) = @_; |
200 | my ($long_desc) = @_; |
201 | |
201 | |
202 | $long_desc =~ s/\s+$//; |
202 | $long_desc =~ s/\s+$//; |
203 | |
203 | |
204 | $self->{long_desc} = $long_desc; |
204 | $self->{long_desc} = $long_desc; |
… | |
… | |
228 | . ($self->{weight} >= 0 ? "One item weighs $self->{weight}g. " : "You have no idea how much this weighs. ") |
228 | . ($self->{weight} >= 0 ? "One item weighs $self->{weight}g. " : "You have no idea how much this weighs. ") |
229 | . ($self->{nrof} ? "You have $self->{nrof} of it. " : "Item cannot stack with others of it's kind. ") |
229 | . ($self->{nrof} ? "You have $self->{nrof} of it. " : "Item cannot stack with others of it's kind. ") |
230 | . "\n\n$tooltip_std" |
230 | . "\n\n$tooltip_std" |
231 | ); |
231 | ); |
232 | } |
232 | } |
|
|
233 | |