… | |
… | |
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 |
… | |
… | |
174 | |
139 | |
175 | To avoid too many false positives, this is only done when: |
140 | To avoid too many false positives, this is only done when: |
176 | |
141 | |
177 | =over 4 |
142 | =over 4 |
178 | |
143 | |
|
|
144 | =item - the tty is in ICANON state. |
|
|
145 | |
|
|
146 | =item - the text cursor is visible. |
|
|
147 | |
|
|
148 | =item - the primary screen is currently being displayed. |
|
|
149 | |
179 | =item - the mouse is on the same (multi-row-) line as the text cursor. |
150 | =item - the mouse is on the same (multi-row-) line as the text cursor. |
180 | |
|
|
181 | =item - the primary screen is currently being displayed. |
|
|
182 | |
|
|
183 | =item - the text cursor is visible. |
|
|
184 | |
151 | |
185 | =back |
152 | =back |
186 | |
153 | |
187 | The normal selection mechanism isn't disabled, so quick successive clicks |
154 | The normal selection mechanism isn't disabled, so quick successive clicks |
188 | might interfere with selection creation in harmless ways. |
155 | might interfere with selection creation in harmless ways. |
|
|
156 | |
|
|
157 | =item selection-autotransform |
|
|
158 | |
|
|
159 | This selection allows you to do automatic transforms on a selection |
|
|
160 | whenever a selection is made. |
|
|
161 | |
|
|
162 | It works by specifying perl snippets (most useful is a single C<s///> |
|
|
163 | operator) that modify C<$_> as resources: |
|
|
164 | |
|
|
165 | URxvt.selection-autotransform.0: transform |
|
|
166 | URxvt.selection-autotransform.1: transform |
|
|
167 | ... |
|
|
168 | |
|
|
169 | For example, the following will transform selections of the form |
|
|
170 | C<filename:number>, often seen in compiler messages, into C<vi +$filename |
|
|
171 | $word>: |
|
|
172 | |
|
|
173 | URxvt.selection-autotransform.0: s/^([^:[:space:]]+):(\\d+):?$/vi +$2 \\Q$1\\E\\x0d/ |
|
|
174 | |
|
|
175 | And this example matches the same,but replaces it with vi-commands you can |
|
|
176 | paste directly into your (vi :) editor: |
|
|
177 | |
|
|
178 | URxvt.selection-autotransform.0: s/^([^:[:space:]]+(\\d+):?$/:e \\Q$1\\E\\x0d:$2\\x0d/ |
|
|
179 | |
|
|
180 | Of course, this can be modified to suit your needs and your editor :) |
|
|
181 | |
|
|
182 | To expand the example above to typical perl error messages ("XXX at |
|
|
183 | FILENAME line YYY."), you need a slightly more elaborate solution: |
|
|
184 | |
|
|
185 | URxvt.selection.pattern-0: ( at .*? line \\d+[,.]) |
|
|
186 | URxvt.selection-autotransform.0: s/^ at (.*?) line (\\d+)[,.]$/:e \\Q$1\E\\x0d:$2\\x0d/ |
|
|
187 | |
|
|
188 | The first line tells the selection code to treat the unchanging part of |
|
|
189 | every error message as a selection pattern, and the second line transforms |
|
|
190 | the message into vi commands to load the file. |
189 | |
191 | |
190 | =item tabbed |
192 | =item tabbed |
191 | |
193 | |
192 | This transforms the terminal into a tabbar with additional terminals, that |
194 | This transforms the terminal into a tabbar with additional terminals, that |
193 | is, it implements what is commonly refered to as "tabbed terminal". The topmost line |
195 | is, it implements what is commonly refered to as "tabbed terminal". The topmost line |
… | |
… | |
561 | our $LIBDIR; |
563 | our $LIBDIR; |
562 | our $RESNAME; |
564 | our $RESNAME; |
563 | our $RESCLASS; |
565 | our $RESCLASS; |
564 | our $RXVTNAME; |
566 | our $RXVTNAME; |
565 | |
567 | |
566 | our $NOCHAR = chr 0xfffe; |
568 | our $NOCHAR = chr 0xffff; |
567 | |
569 | |
568 | =head2 Variables in the C<urxvt> Package |
570 | =head2 Variables in the C<urxvt> Package |
569 | |
571 | |
570 | =over 4 |
572 | =over 4 |
571 | |
573 | |
… | |
… | |
718 | unless $msg =~ /\n$/; |
720 | unless $msg =~ /\n$/; |
719 | urxvt::warn ($msg); |
721 | urxvt::warn ($msg); |
720 | }; |
722 | }; |
721 | } |
723 | } |
722 | |
724 | |
|
|
725 | no warnings 'utf8'; |
|
|
726 | |
723 | my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; |
727 | my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; |
724 | |
728 | |
725 | sub verbose { |
729 | sub verbose { |
726 | my ($level, $msg) = @_; |
730 | my ($level, $msg) = @_; |
727 | warn "$msg\n" if $level <= $verbosity; |
731 | warn "$msg\n" if $level <= $verbosity; |
… | |
… | |
743 | |
747 | |
744 | open my $fh, "<:raw", $path |
748 | open my $fh, "<:raw", $path |
745 | or die "$path: $!"; |
749 | or die "$path: $!"; |
746 | |
750 | |
747 | my $source = |
751 | my $source = |
748 | "package $pkg; use strict; use utf8;\n" |
752 | "package $pkg; use strict; use utf8; no warnings 'utf8';\n" |
749 | . "#line 1 \"$path\"\n{\n" |
753 | . "#line 1 \"$path\"\n{\n" |
750 | . (do { local $/; <$fh> }) |
754 | . (do { local $/; <$fh> }) |
751 | . "\n};\n1"; |
755 | . "\n};\n1"; |
752 | |
756 | |
753 | eval $source |
757 | eval $source |
… | |
… | |
778 | $TERM->register_package ($_) for @pkg; |
782 | $TERM->register_package ($_) for @pkg; |
779 | } |
783 | } |
780 | |
784 | |
781 | for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) { |
785 | for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) { |
782 | if ($_ eq "default") { |
786 | if ($_ eq "default") { |
783 | $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback); |
787 | $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback readline); |
784 | } elsif (/^-(.*)$/) { |
788 | } elsif (/^-(.*)$/) { |
785 | delete $ext_arg{$1}; |
789 | delete $ext_arg{$1}; |
786 | } elsif (/^([^<]+)<(.*)>$/) { |
790 | } elsif (/^([^<]+)<(.*)>$/) { |
787 | push @{ $ext_arg{$1} }, $2; |
791 | push @{ $ext_arg{$1} }, $2; |
788 | } else { |
792 | } else { |
… | |
… | |
1308 | Replaces the event mask of the pty watcher by the given event mask. Can |
1312 | Replaces the event mask of the pty watcher by the given event mask. Can |
1309 | be used to suppress input and output handling to the pty/tty. See the |
1313 | be used to suppress input and output handling to the pty/tty. See the |
1310 | description of C<< urxvt::timer->events >>. Make sure to always restore |
1314 | description of C<< urxvt::timer->events >>. Make sure to always restore |
1311 | the previous value. |
1315 | the previous value. |
1312 | |
1316 | |
|
|
1317 | =item $fd = $term->pty_fd |
|
|
1318 | |
|
|
1319 | Returns the master file descriptor for the pty in use, or C<-1> if no pty |
|
|
1320 | is used. |
|
|
1321 | |
1313 | =item $windowid = $term->parent |
1322 | =item $windowid = $term->parent |
1314 | |
1323 | |
1315 | Return the window id of the toplevel window. |
1324 | Return the window id of the toplevel window. |
1316 | |
1325 | |
1317 | =item $windowid = $term->vt |
1326 | =item $windowid = $term->vt |
… | |
… | |
1416 | If C<$new_text> is specified, it will replace characters in the current |
1425 | If C<$new_text> is specified, it will replace characters in the current |
1417 | line, starting at column C<$start_col> (default C<0>), which is useful |
1426 | line, starting at column C<$start_col> (default C<0>), which is useful |
1418 | to replace only parts of a line. The font index in the rendition will |
1427 | to replace only parts of a line. The font index in the rendition will |
1419 | automatically be updated. |
1428 | automatically be updated. |
1420 | |
1429 | |
1421 | C<$text> is in a special encoding: tabs and wide characters that use |
1430 | C<$text> is in a special encoding: tabs and wide characters that use more |
1422 | more than one cell when displayed are padded with C<$urxvt::NOCHAR> |
1431 | than one cell when displayed are padded with C<$urxvt::NOCHAR> (chr 65535) |
1423 | characters. Characters with combining characters and other characters that |
1432 | characters. Characters with combining characters and other characters that |
1424 | do not fit into the normal tetx encoding will be replaced with characters |
1433 | do not fit into the normal tetx encoding will be replaced with characters |
1425 | in the private use area. |
1434 | in the private use area. |
1426 | |
1435 | |
1427 | You have to obey this encoding when changing text. The advantage is |
1436 | You have to obey this encoding when changing text. The advantage is |