X-Git-Url: https://git.realraum.at/?a=blobdiff_plain;f=dart%2FDart.pm;fp=dart%2FDart.pm;h=7adec4a41fc72980caee0df5cdf1957f6ba5f4fb;hb=58ef4755ed9b063bbbb6ae579e603366acfbf744;hp=d9b37954dd1272c2a89bd6a3ef494b710fc31c68;hpb=0e5aa9dd0b200a8bd5d9b886debfd9b44c451b0f;p=svn42.git

diff --git a/dart/Dart.pm b/dart/Dart.pm
index d9b3795..7adec4a 100644
--- a/dart/Dart.pm
+++ b/dart/Dart.pm
@@ -29,7 +29,7 @@ sub get_color
 {
   my $self=shift;
   my ($mul,$zahl)=@_;
-  my @zahlen =  qw/20 1 18 4 13 6 10 15 2 17 3 19 7 16 8 11 14 9 12 5/;
+  my @zahlen =  qw/20 1 18 4 13 6 10 15 2 17 3 19 7 16 8 11 14 9 12 5 25/;
   my $counter=0;
   $counter++ while($zahl != shift @zahlen and @zahlen);
   $mul=0 if $mul >1;