X-Git-Url: https://git.realraum.at/?a=blobdiff_plain;f=dart%2Fdart-x01.pl;fp=dart%2Fdart-x01.pl;h=8a73306e1adf61160c460dc4b44b8351078ab32d;hb=8f892f83541a408666c30c7ec79f57b4d92799c4;hp=22bcbcbe19201a5eadc72d2bbc7a22a48201f7f7;hpb=7b865a439b291bd1b5b2e31b2616a02c5dce2d3f;p=svn42.git diff --git a/dart/dart-x01.pl b/dart/dart-x01.pl index 22bcbcb..8a73306 100644 --- a/dart/dart-x01.pl +++ b/dart/dart-x01.pl @@ -49,6 +49,7 @@ sub shoot else { $self->shout("miss"); + $self->get_current_player()->{score} = $self->get_current_player()->{last_score}; $self->finish_player_round(); } } @@ -56,6 +57,7 @@ sub shoot sub next_player { my $self=shift; + $self->get_current_player()->{last_score} = $self->get_current_player()->{score}; } sub print_score