--- rxvt-unicode/src/perl/background	2012/06/14 19:31:17	1.59
+++ rxvt-unicode/src/perl/background	2012/06/15 13:21:59	1.60
@@ -699,8 +699,8 @@
    sub rotate($$$$) {
       my $img = pop;
       $img->rotate (
-         $_[0] * $img->w,
-         $_[1] * $img->h,
+         $_[0] * ($img->w + $img->x),
+         $_[1] * ($img->h + $img->y),
          $_[2] * (3.14159265 / 180),
       )
    }