89c89,95
<       $anim->color(1);
---
>     $anim->color(1);
>     use_default_colors();
>     my $cid = 1;
>     for my $f ('WHITE', 'RED', 'GREEN', 'BLUE', 'CYAN', 'MAGENTA', 'YELLOW', 'BLACK') {
>         init_pair($cid, eval "Curses::COLOR_$f", -1);
>         $cid++;
>     }