--- rxvt-unicode/src/perl/automove-background	2006/03/04 22:36:50	1.6
+++ rxvt-unicode/src/perl/automove-background	2006/03/04 22:52:44	1.8
@@ -5,13 +5,11 @@
 
    if ($op == 20) {
       my ($pic, $commands) = split(/;/, $args, 2);
-      warn "   pic=$pic commands=$commands";
       if ($pic !~ /^$/ && $commands !~ /[+\-]/) {
          my ($x, $y) = $self->XTranslateCoordinates (
             $self->vt, $self->DefaultRootWindow,
             0, 0
          );
-         warn "      $x $y \\033]20;$pic;=+$x+$y\\007";
          $self->cmd_parse ("\033]20;$pic;=+$x+$y\007");
          return 1;
       }
@@ -29,4 +27,6 @@
    );
 
    $self->cmd_parse ("\033]20;;=+$x+$y\007");
+
+   ()
 }