--- rxvt-unicode/src/perl/background 2012/06/08 22:21:48 1.41 +++ rxvt-unicode/src/perl/background 2012/06/10 10:42:19 1.42 @@ -254,7 +254,7 @@ =cut - sub solid($$;$) { + sub solid($;$$) { my $colour = pop; my $img = $self->new_img (urxvt::PictStandardARGB32, $_[0] || 1, $_[1] || 1);