--- rxvt-unicode/src/perl/remote-selection 2006/01/25 15:04:53 1.2 +++ rxvt-unicode/src/perl/remote-selection 2006/01/25 15:15:43 1.3 @@ -75,7 +75,9 @@ $self->selection_clear; $self->selection ($txt); $self->selection_grab (urxvt::CurrentTime); - $self->wait_pipe ($fh, $pid, "selection fetched"); + close $fh; + my $status = $? >> 8; + $self->msg ("selection fetched (status $status)"); } }); }