… | |
… | |
786 | $text .= "\nHandicap: " . $self->{handicap}; |
786 | $text .= "\nHandicap: " . $self->{handicap}; |
787 | $text .= "\nKomi: " . $self->{komi}; |
787 | $text .= "\nKomi: " . $self->{komi}; |
788 | $text .= "\nSize: " . $self->size_string; |
788 | $text .= "\nSize: " . $self->size_string; |
789 | } |
789 | } |
790 | |
790 | |
|
|
791 | if ($self->is_scored) { |
|
|
792 | $text .= "\nResult: " . $self->score_string; |
|
|
793 | } |
|
|
794 | |
791 | $self->{text}->append_text ("<infoblock>$text</infoblock>"); |
795 | $self->{text}->append_text ("<infoblock>$text</infoblock>"); |
792 | } |
796 | } |
793 | |
797 | |
794 | sub event_update_rules { |
798 | sub event_update_rules { |
795 | my ($self, $rules) = @_; |
799 | my ($self, $rules) = @_; |