ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/perl/background
(Generate patch)

Comparing rxvt-unicode/src/perl/background (file contents):
Revision 1.94 by root, Tue Sep 17 17:15:29 2019 UTC vs.
Revision 1.95 by root, Tue Sep 17 17:29:16 2019 UTC

… …
1499sub on_osc_seq { 1499sub on_osc_seq {
1500 my ($self, $op, $arg) = @_; 1500 my ($self, $op, $arg) = @_;
1501 1501
1502 $self->{bg_opts} or return; 1502 $self->{bg_opts} or return;
1503 1503
1504 $op =~ /^(20|705)$/ or return; 1504 $op =~ /^(?:20|705)$/ or return;
1505 1505
1506 if ($op eq "20") { 1506 if ($op eq "20") {
1507 if ($arg eq "?") { 1507 if ($arg eq "?") {
1508 my $h_scale = $self->{bg_opts}->{h_scale}; 1508 my $h_scale = $self->{bg_opts}->{h_scale};
1509 my $v_scale = $self->{bg_opts}->{v_scale}; 1509 my $v_scale = $self->{bg_opts}->{v_scale};

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines