| … | |
… | |
| 603 | } |
603 | } |
| 604 | if ($pattern eq $prefix) { |
604 | if ($pattern eq $prefix) { |
| 605 | $name = "$urxvt::RESCLASS.$k$suffix"; |
605 | $name = "$urxvt::RESCLASS.$k$suffix"; |
| 606 | |
606 | |
| 607 | push @{ $term->{perl_ext_3} }, $v->[0]; |
607 | push @{ $term->{perl_ext_3} }, $v->[0]; |
|
|
608 | |
|
|
609 | return 1 unless $isarg; |
| 608 | |
610 | |
| 609 | if ($v->[1] eq "boolean") { |
611 | if ($v->[1] eq "boolean") { |
| 610 | $term->put_option_db ($name, $flag ? "true" : "false"); |
612 | $term->put_option_db ($name, $flag ? "true" : "false"); |
| 611 | return 1; |
613 | return 1; |
| 612 | } else { |
614 | } else { |
