ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/DC.pm
(Generate patch)

Comparing deliantra/Deliantra-Client/DC.pm (file contents):
Revision 1.66 by root, Thu May 25 21:18:47 2006 UTC vs.
Revision 1.69 by root, Thu May 25 23:06:05 2006 UTC

… …
171 . $_[1]->content->present ($_[0]) 171 . $_[1]->content->present ($_[0])
172} 172}
173 173
174sub view_verbatim { 174sub view_verbatim {
175 (join "", 175 (join "",
176 map +("\t" x ($indent / 2)) . "$_\n", 176 map +("\t" x ($indent / 2)) . "<tt>$_</tt>\n",
177 split /\n/, CFClient::UI::Label::escape ($_[1])) 177 split /\n/, CFClient::UI::Label::escape ($_[1]))
178 . "\n" 178 . "\n"
179} 179}
180 180
181sub view_textblock { 181sub view_textblock {
182 ("\t" x ($indent / 2)) . "$_[1]\n\n" 182 ("\t" x ($indent / 2)) . "$_[1]\n\n"
183} 183}
184 184
185sub view_head1 { 185sub view_head1 {
186 "<span foreground='#ffff00' size='x-large'>" . $_[1]->title->present ($_[0]) . "</span>\n\n" 186 "\n\n<span foreground='#ffff00' size='x-large'>" . $_[1]->title->present ($_[0]) . "</span>\n\n"
187 . $_[1]->content->present ($_[0]) 187 . $_[1]->content->present ($_[0])
188}; 188};
189 189
190sub view_head2 { 190sub view_head2 {
191 "<span foreground='#ccccff' size='large'>" . $_[1]->title->present ($_[0]) . "</span>\n\n" 191 "\n<span foreground='#ccccff' size='large'>" . $_[1]->title->present ($_[0]) . "</span>\n\n"
192 . $_[1]->content->present ($_[0])
193};
194
195sub view_head3 {
196 "\n<span size='large'>" . $_[1]->title->present ($_[0]) . "</span>\n\n"
192 . $_[1]->content->present ($_[0]) 197 . $_[1]->content->present ($_[0])
193}; 198};
194 199
195sub view_over { 200sub view_over {
196 local $indent = $indent + $_[1]->indent; 201 local $indent = $indent + $_[1]->indent;
… …
304 . "</small>\n"; 309 . "</small>\n";
305 310
306 $self->{face_widget} ||= new CFClient::UI::Face 311 $self->{face_widget} ||= new CFClient::UI::Face
307 can_events => 1, 312 can_events => 1,
308 can_hover => 1, 313 can_hover => 1,
314 anim => $self->{anim},
309 animspeed => $self->{animspeed}, # TODO# must be set at creation time 315 animspeed => $self->{animspeed}, # TODO# must be set at creation time
310 connect_button_down => $button_cb, 316 connect_button_down => $button_cb,
311 ; 317 ;
312 $self->{face_widget}{face} = $self->{face}; 318 $self->{face_widget}{face} = $self->{face};
313 $self->{face_widget}{anim} = $self->{anim}; 319 $self->{face_widget}{anim} = $self->{anim};
… …
321 327
322 $self->{desc_widget} ||= new CFClient::UI::Label 328 $self->{desc_widget} ||= new CFClient::UI::Label
323 can_events => 1, 329 can_events => 1,
324 can_hover => 1, 330 can_hover => 1,
325 ellipsise => 2, 331 ellipsise => 2,
326 xalign => 0, 332 align => -1,
327 connect_button_down => $button_cb, 333 connect_button_down => $button_cb,
328 ; 334 ;
329 my $desc = CFClient::Item::desc_string $self; 335 my $desc = CFClient::Item::desc_string $self;
330 $self->{desc_widget}->set_text ($desc); 336 $self->{desc_widget}->set_text ($desc);
331 $self->{desc_widget}->set_tooltip ("<b>$desc</b>.\n$tooltip_std"); 337 $self->{desc_widget}->set_tooltip ("<b>$desc</b>.\n$tooltip_std");
332 338
333 $self->{weight_widget} ||= new CFClient::UI::Label 339 $self->{weight_widget} ||= new CFClient::UI::Label
334 can_events => 1, 340 can_events => 1,
335 can_hover => 1, 341 can_hover => 1,
336 ellipsise => 0, 342 ellipsise => 0,
337 xalign => 0.5, 343 align => 0,
338 connect_button_down => $button_cb, 344 connect_button_down => $button_cb,
339 ; 345 ;
340 $self->{weight_widget}->set_text (CFClient::Item::weight_string $self); 346 $self->{weight_widget}->set_text (CFClient::Item::weight_string $self);
341 347
342 $self->{weight_widget}->set_tooltip ( 348 $self->{weight_widget}->set_tooltip (

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines