| … | |
… | |
| 304 | . "</small>\n"; |
304 | . "</small>\n"; |
| 305 | |
305 | |
| 306 | $self->{face_widget} ||= new CFClient::UI::Face |
306 | $self->{face_widget} ||= new CFClient::UI::Face |
| 307 | can_events => 1, |
307 | can_events => 1, |
| 308 | can_hover => 1, |
308 | can_hover => 1, |
|
|
309 | anim => $self->{anim}, |
|
|
310 | animspeed => $self->{animspeed}, # TODO# must be set at creation time |
| 309 | connect_button_down => $button_cb, |
311 | connect_button_down => $button_cb, |
| 310 | ; |
312 | ; |
| 311 | $self->{face_widget}{face} = $self->{face}; |
313 | $self->{face_widget}{face} = $self->{face}; |
| 312 | $self->{face_widget}{anim} = $self->{anim}; |
314 | $self->{face_widget}{anim} = $self->{anim}; |
| 313 | $self->{face_widget}{animspeed} = $self->{animespeed}; |
315 | $self->{face_widget}{animspeed} = $self->{animspeed}; |
| 314 | $self->{face_widget}->set_tooltip ( |
316 | $self->{face_widget}->set_tooltip ( |
| 315 | "<b>Face/Animation.</b>\n" |
317 | "<b>Face/Animation.</b>\n" |
| 316 | . "Item uses face #$self->{face}. " |
318 | . "Item uses face #$self->{face}. " |
| 317 | . ($self->{animspeed} ? "Item uses animation #$self->{anim} at " . (1 / $self->{animspeed}) . "fps. " : "Item is not animated. ") |
319 | . ($self->{animspeed} ? "Item uses animation #$self->{anim} at " . (1 / $self->{animspeed}) . "fps. " : "Item is not animated. ") |
| 318 | . "\n\n$tooltip_std" |
320 | . "\n\n$tooltip_std" |
