… | |
… | |
1134 | my ($self) = @_; |
1134 | my ($self) = @_; |
1135 | |
1135 | |
1136 | return if exists $self->{meta}; |
1136 | return if exists $self->{meta}; |
1137 | |
1137 | |
1138 | my @urxvtdirs = perl_libdirs $self; |
1138 | my @urxvtdirs = perl_libdirs $self; |
1139 | my @cpandirs = grep -d, map "$_/URxvt/Ext", @INC; |
1139 | # my @cpandirs = grep -d, map "$_/URxvt/Ext", @INC; |
1140 | |
1140 | |
1141 | $self->{meta} = \my %meta; |
1141 | $self->{meta} = \my %meta; |
1142 | |
1142 | |
1143 | # first gather extensions |
1143 | # first gather extensions |
1144 | |
1144 | |
… | |
… | |
1181 | |
1181 | |
1182 | $meta{ext}{$ext} = \%ext; |
1182 | $meta{ext}{$ext} = \%ext; |
1183 | } |
1183 | } |
1184 | }; |
1184 | }; |
1185 | |
1185 | |
1186 | $gather->($_, 0) for @cpandirs; |
1186 | # $gather->($_, 0) for @cpandirs; |
1187 | $gather->($_, 1) for @urxvtdirs; |
1187 | $gather->($_, 1) for @urxvtdirs; |
1188 | |
1188 | |
1189 | # and now merge resources |
1189 | # and now merge resources |
1190 | |
1190 | |
1191 | $meta{resource} = \my %resource; |
1191 | $meta{resource} = \my %resource; |
… | |
… | |
1346 | my $res = &x_resource; |
1346 | my $res = &x_resource; |
1347 | |
1347 | |
1348 | $res =~ /^\s*(?:true|yes|on|1)\s*$/i ? 1 : defined $res && 0 |
1348 | $res =~ /^\s*(?:true|yes|on|1)\s*$/i ? 1 : defined $res && 0 |
1349 | } |
1349 | } |
1350 | |
1350 | |
|
|
1351 | =item $action = $term->lookup_keysym ($keysym, $state) |
|
|
1352 | |
|
|
1353 | Returns the action bound to key combination C<($keysym, $state)>, |
|
|
1354 | if a binding for it exists, and C<undef> otherwise. |
|
|
1355 | |
1351 | =item $success = $term->bind_action ($key, $action) |
1356 | =item $success = $term->bind_action ($key, $action) |
1352 | |
1357 | |
1353 | Adds a key binding exactly as specified via a C<keysym> resource. See the |
1358 | Adds a key binding exactly as specified via a C<keysym> resource. See the |
1354 | C<keysym> resource in the urxvt(1) manpage. |
1359 | C<keysym> resource in the urxvt(1) manpage. |
1355 | |
1360 | |
… | |
… | |
1696 | Requests a screen refresh. At the next opportunity, rxvt-unicode will |
1701 | Requests a screen refresh. At the next opportunity, rxvt-unicode will |
1697 | compare the on-screen display with its stored representation. If they |
1702 | compare the on-screen display with its stored representation. If they |
1698 | differ, it redraws the differences. |
1703 | differ, it redraws the differences. |
1699 | |
1704 | |
1700 | Used after changing terminal contents to display them. |
1705 | Used after changing terminal contents to display them. |
|
|
1706 | |
|
|
1707 | =item $term->refresh_check |
|
|
1708 | |
|
|
1709 | Checks if a refresh has been requested and, if so, schedules one. |
1701 | |
1710 | |
1702 | =item $text = $term->ROW_t ($row_number[, $new_text[, $start_col]]) |
1711 | =item $text = $term->ROW_t ($row_number[, $new_text[, $start_col]]) |
1703 | |
1712 | |
1704 | Returns the text of the entire row with number C<$row_number>. Row C<< $term->top_row >> |
1713 | Returns the text of the entire row with number C<$row_number>. Row C<< $term->top_row >> |
1705 | is the topmost terminal line, row C<< $term->nrow-1 >> is the bottommost |
1714 | is the topmost terminal line, row C<< $term->nrow-1 >> is the bottommost |