| … | |
… | |
| 127 | bottom. C<Escape> leaves search mode and returns to the point where search |
127 | bottom. C<Escape> leaves search mode and returns to the point where search |
| 128 | was started, while C<Enter> or C<Return> stay at the current position and |
128 | was started, while C<Enter> or C<Return> stay at the current position and |
| 129 | additionally stores the first match in the current line into the primary |
129 | additionally stores the first match in the current line into the primary |
| 130 | selection. |
130 | selection. |
| 131 | |
131 | |
| 132 | =item selection-autotransform |
132 | =item readline (enabled by default) |
| 133 | |
|
|
| 134 | This selection allows you to do automatic transforms on a selection |
|
|
| 135 | whenever a selection is made. |
|
|
| 136 | |
|
|
| 137 | It works by specifying perl snippets (most useful is a single C<s///> |
|
|
| 138 | operator) that modify C<$_> as resources: |
|
|
| 139 | |
|
|
| 140 | URxvt.selection-autotransform.0: transform |
|
|
| 141 | URxvt.selection-autotransform.1: transform |
|
|
| 142 | ... |
|
|
| 143 | |
|
|
| 144 | For example, the following will transform selections of the form |
|
|
| 145 | C<filename:number>, often seen in compiler messages, into C<vi +$filename |
|
|
| 146 | $word>: |
|
|
| 147 | |
|
|
| 148 | URxvt.selection-autotransform.0: s/^([^:[:space:]]+):(\\d+):?$/vi +$2 \\Q$1\\E\\x0d/ |
|
|
| 149 | |
|
|
| 150 | And this example matches the same,but replaces it with vi-commands you can |
|
|
| 151 | paste directly into your (vi :) editor: |
|
|
| 152 | |
|
|
| 153 | URxvt.selection-autotransform.0: s/^([^:[:space:]]+(\\d+):?$/:e \\Q$1\\E\\x0d:$2\\x0d/ |
|
|
| 154 | |
|
|
| 155 | Of course, this can be modified to suit your needs and your editor :) |
|
|
| 156 | |
|
|
| 157 | To expand the example above to typical perl error messages ("XXX at |
|
|
| 158 | FILENAME line YYY."), you need a slightly more elaborate solution: |
|
|
| 159 | |
|
|
| 160 | URxvt.selection.pattern-0: ( at .*? line \\d+[,.]) |
|
|
| 161 | URxvt.selection-autotransform.0: s/^ at (.*?) line (\\d+)[,.]$/:e \\Q$1\E\\x0d:$2\\x0d/ |
|
|
| 162 | |
|
|
| 163 | The first line tells the selection code to treat the unchanging part of |
|
|
| 164 | every error message as a selection pattern, and the second line transforms |
|
|
| 165 | the message into vi commands to load the file. |
|
|
| 166 | |
|
|
| 167 | =item readline |
|
|
| 168 | |
133 | |
| 169 | A support package that tries to make editing with readline easier. At the |
134 | A support package that tries to make editing with readline easier. At the |
| 170 | moment, it reacts to clicking with the left mouse button by trying to |
135 | moment, it reacts to clicking with the left mouse button by trying to |
| 171 | move the text cursor to this position. It does so by generating as many |
136 | move the text cursor to this position. It does so by generating as many |
| 172 | cursor-left or cursor-right keypresses as required (the this only works |
137 | cursor-left or cursor-right keypresses as required (the this only works |
| 173 | for programs that correctly support wide characters). |
138 | for programs that correctly support wide characters). |
| 174 | |
139 | |
| 175 | It only works when clicking into the same line (possibly extended over |
140 | To avoid too many false positives, this is only done when: |
| 176 | multiple rows) as the text cursor and on the primary screen, to reduce the |
141 | |
| 177 | risk of misinterpreting. The normal selection isn't disabled, so quick |
142 | =over 4 |
|
|
143 | |
|
|
144 | =item - the mouse is on the same (multi-row-) line as the text cursor. |
|
|
145 | |
|
|
146 | =item - the primary screen is currently being displayed. |
|
|
147 | |
|
|
148 | =item - the text cursor is visible. |
|
|
149 | |
|
|
150 | =back |
|
|
151 | |
|
|
152 | The normal selection mechanism isn't disabled, so quick successive clicks |
| 178 | successive clicks might interfere with selection creation in harmless |
153 | might interfere with selection creation in harmless ways. |
| 179 | ways. |
154 | |
|
|
155 | =item selection-autotransform |
|
|
156 | |
|
|
157 | This selection allows you to do automatic transforms on a selection |
|
|
158 | whenever a selection is made. |
|
|
159 | |
|
|
160 | It works by specifying perl snippets (most useful is a single C<s///> |
|
|
161 | operator) that modify C<$_> as resources: |
|
|
162 | |
|
|
163 | URxvt.selection-autotransform.0: transform |
|
|
164 | URxvt.selection-autotransform.1: transform |
|
|
165 | ... |
|
|
166 | |
|
|
167 | For example, the following will transform selections of the form |
|
|
168 | C<filename:number>, often seen in compiler messages, into C<vi +$filename |
|
|
169 | $word>: |
|
|
170 | |
|
|
171 | URxvt.selection-autotransform.0: s/^([^:[:space:]]+):(\\d+):?$/vi +$2 \\Q$1\\E\\x0d/ |
|
|
172 | |
|
|
173 | And this example matches the same,but replaces it with vi-commands you can |
|
|
174 | paste directly into your (vi :) editor: |
|
|
175 | |
|
|
176 | URxvt.selection-autotransform.0: s/^([^:[:space:]]+(\\d+):?$/:e \\Q$1\\E\\x0d:$2\\x0d/ |
|
|
177 | |
|
|
178 | Of course, this can be modified to suit your needs and your editor :) |
|
|
179 | |
|
|
180 | To expand the example above to typical perl error messages ("XXX at |
|
|
181 | FILENAME line YYY."), you need a slightly more elaborate solution: |
|
|
182 | |
|
|
183 | URxvt.selection.pattern-0: ( at .*? line \\d+[,.]) |
|
|
184 | URxvt.selection-autotransform.0: s/^ at (.*?) line (\\d+)[,.]$/:e \\Q$1\E\\x0d:$2\\x0d/ |
|
|
185 | |
|
|
186 | The first line tells the selection code to treat the unchanging part of |
|
|
187 | every error message as a selection pattern, and the second line transforms |
|
|
188 | the message into vi commands to load the file. |
| 180 | |
189 | |
| 181 | =item tabbed |
190 | =item tabbed |
| 182 | |
191 | |
| 183 | This transforms the terminal into a tabbar with additional terminals, that |
192 | This transforms the terminal into a tabbar with additional terminals, that |
| 184 | is, it implements what is commonly refered to as "tabbed terminal". The topmost line |
193 | is, it implements what is commonly refered to as "tabbed terminal". The topmost line |
| … | |
… | |
| 552 | our $LIBDIR; |
561 | our $LIBDIR; |
| 553 | our $RESNAME; |
562 | our $RESNAME; |
| 554 | our $RESCLASS; |
563 | our $RESCLASS; |
| 555 | our $RXVTNAME; |
564 | our $RXVTNAME; |
| 556 | |
565 | |
| 557 | our $NOCHAR = chr 0xfffe; |
566 | our $NOCHAR = chr 0xffff; |
| 558 | |
567 | |
| 559 | =head2 Variables in the C<urxvt> Package |
568 | =head2 Variables in the C<urxvt> Package |
| 560 | |
569 | |
| 561 | =over 4 |
570 | =over 4 |
| 562 | |
571 | |
| … | |
… | |
| 709 | unless $msg =~ /\n$/; |
718 | unless $msg =~ /\n$/; |
| 710 | urxvt::warn ($msg); |
719 | urxvt::warn ($msg); |
| 711 | }; |
720 | }; |
| 712 | } |
721 | } |
| 713 | |
722 | |
|
|
723 | no warnings 'utf8'; |
|
|
724 | |
| 714 | my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; |
725 | my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; |
| 715 | |
726 | |
| 716 | sub verbose { |
727 | sub verbose { |
| 717 | my ($level, $msg) = @_; |
728 | my ($level, $msg) = @_; |
| 718 | warn "$msg\n" if $level <= $verbosity; |
729 | warn "$msg\n" if $level <= $verbosity; |
| … | |
… | |
| 734 | |
745 | |
| 735 | open my $fh, "<:raw", $path |
746 | open my $fh, "<:raw", $path |
| 736 | or die "$path: $!"; |
747 | or die "$path: $!"; |
| 737 | |
748 | |
| 738 | my $source = |
749 | my $source = |
| 739 | "package $pkg; use strict; use utf8;\n" |
750 | "package $pkg; use strict; use utf8; no warnings 'utf8';\n" |
| 740 | . "#line 1 \"$path\"\n{\n" |
751 | . "#line 1 \"$path\"\n{\n" |
| 741 | . (do { local $/; <$fh> }) |
752 | . (do { local $/; <$fh> }) |
| 742 | . "\n};\n1"; |
753 | . "\n};\n1"; |
| 743 | |
754 | |
| 744 | eval $source |
755 | eval $source |
| … | |
… | |
| 769 | $TERM->register_package ($_) for @pkg; |
780 | $TERM->register_package ($_) for @pkg; |
| 770 | } |
781 | } |
| 771 | |
782 | |
| 772 | for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) { |
783 | for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) { |
| 773 | if ($_ eq "default") { |
784 | if ($_ eq "default") { |
| 774 | $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback); |
785 | $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback readline); |
| 775 | } elsif (/^-(.*)$/) { |
786 | } elsif (/^-(.*)$/) { |
| 776 | delete $ext_arg{$1}; |
787 | delete $ext_arg{$1}; |
| 777 | } elsif (/^([^<]+)<(.*)>$/) { |
788 | } elsif (/^([^<]+)<(.*)>$/) { |
| 778 | push @{ $ext_arg{$1} }, $2; |
789 | push @{ $ext_arg{$1} }, $2; |
| 779 | } else { |
790 | } else { |
| … | |
… | |
| 1376 | |
1387 | |
| 1377 | =item $screen = $term->current_screen |
1388 | =item $screen = $term->current_screen |
| 1378 | |
1389 | |
| 1379 | Returns the currently displayed screen (0 primary, 1 secondary). |
1390 | Returns the currently displayed screen (0 primary, 1 secondary). |
| 1380 | |
1391 | |
|
|
1392 | =item $cursor_is_hidden = $term->hidden_cursor |
|
|
1393 | |
|
|
1394 | Returns wether the cursor is currently hidden or not. |
|
|
1395 | |
| 1381 | =item $view_start = $term->view_start ([$newvalue]) |
1396 | =item $view_start = $term->view_start ([$newvalue]) |
| 1382 | |
1397 | |
| 1383 | Returns the row number of the topmost displayed line. Maximum value is |
1398 | Returns the row number of the topmost displayed line. Maximum value is |
| 1384 | C<0>, which displays the normal terminal contents. Lower values scroll |
1399 | C<0>, which displays the normal terminal contents. Lower values scroll |
| 1385 | this many lines into the scrollback buffer. |
1400 | this many lines into the scrollback buffer. |
| … | |
… | |
| 1403 | If C<$new_text> is specified, it will replace characters in the current |
1418 | If C<$new_text> is specified, it will replace characters in the current |
| 1404 | line, starting at column C<$start_col> (default C<0>), which is useful |
1419 | line, starting at column C<$start_col> (default C<0>), which is useful |
| 1405 | to replace only parts of a line. The font index in the rendition will |
1420 | to replace only parts of a line. The font index in the rendition will |
| 1406 | automatically be updated. |
1421 | automatically be updated. |
| 1407 | |
1422 | |
| 1408 | C<$text> is in a special encoding: tabs and wide characters that use |
1423 | C<$text> is in a special encoding: tabs and wide characters that use more |
| 1409 | more than one cell when displayed are padded with C<$urxvt::NOCHAR> |
1424 | than one cell when displayed are padded with C<$urxvt::NOCHAR> (chr 65535) |
| 1410 | characters. Characters with combining characters and other characters that |
1425 | characters. Characters with combining characters and other characters that |
| 1411 | do not fit into the normal tetx encoding will be replaced with characters |
1426 | do not fit into the normal tetx encoding will be replaced with characters |
| 1412 | in the private use area. |
1427 | in the private use area. |
| 1413 | |
1428 | |
| 1414 | You have to obey this encoding when changing text. The advantage is |
1429 | You have to obey this encoding when changing text. The advantage is |
