--- deliantra/Deliantra-Client/DC/UI.pm	2006/06/06 03:02:15	1.292
+++ deliantra/Deliantra-Client/DC/UI.pm	2006/06/06 03:05:16	1.293
@@ -2476,6 +2476,7 @@
    my $self = $class->SUPER::new (
       fontsize   => 1,
       can_events => 0,
+      indent     => 0,
       #font      => default_font
       @_,
                  
@@ -2508,7 +2509,7 @@
    $self->{layout}->set_font ($self->{font}) if $self->{font};
    $self->{layout}->set_height ($self->{fontsize} * $::FONTSIZE);
    $self->{layout}->set_width ($self->{children}[0]{w});
-   $self->{layout}->set_indent (-$self->{fontsize} * $::FONTSIZE * 4);
+   $self->{layout}->set_indent ($self->{fontsize} * $::FONTSIZE * $self->{indent});
 
    $self->reflow;
 }
@@ -2520,7 +2521,7 @@
 
    $layout->set_height ($self->{fontsize} * $::FONTSIZE);
    $layout->set_width ($self->{children}[0]{w} - $indent);
-   $layout->set_indent (-$self->{fontsize} * $::FONTSIZE * 4);
+   $layout->set_indent ($self->{fontsize} * $::FONTSIZE * $self->{indent});
    $layout->set_markup ($text);
    
    $layout->size
@@ -2582,7 +2583,7 @@
          for (@{$self->{par}}) {
             if (1 || $_->[0] >= $W) { # TODO: works,but needs reconfigure etc. support
                $layout->set_width ($W - $_->[3]);
-               $layout->set_indent (-$self->{fontsize} * $::FONTSIZE * 4);
+               $layout->set_indent ($self->{fontsize} * $::FONTSIZE * $self->{indent});
                $layout->set_markup ($_->[4]);
                my ($w, $h) = $layout->size;
                $_->[0] = $w + $_->[3];
@@ -2624,7 +2625,7 @@
             if ($y0 < $y + $h && $y < $y1) {
                $layout->set_foreground (@{ $par->[2] });
                $layout->set_width ($W - $par->[3]);
-               $layout->set_indent (-$self->{fontsize} * $::FONTSIZE * 4);
+               $layout->set_indent ($self->{fontsize} * $::FONTSIZE * $self->{indent});
                $layout->set_markup ($par->[4]);
 
                my ($w, $h, $data, $format, $internalformat) = $layout->render;