--- rxvt-unicode/src/perl/confirm-paste 2011/01/08 00:20:45 1.3 +++ rxvt-unicode/src/perl/confirm-paste 2011/03/09 19:32:03 1.4 @@ -16,8 +16,9 @@ $self->{paste} = \$str; $self->msg ("Paste of $count lines, continue? (y/n)"); - (my $preview = $self->locale_decode ($str)) =~ s/\n/\\n/g; - $self->{overlay}->set (0, 1, $preview); + my $preview = substr $self->locale_decode ($str), 0, $self->ncol; + $preview =~ s/\n/\\n/g; + $self->{overlay}->set (0, 1, $self->special_encode ($preview)); $self->enable (key_press => \&key_press); 1