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

Comparing rxvt-unicode/src/urxvt.pm (file contents):
Revision 1.123 by root, Sat Jan 21 14:49:18 2006 UTC vs.
Revision 1.125 by root, Sun Jan 22 20:39:47 2006 UTC

… …
139 139
140To avoid too many false positives, this is only done when: 140To avoid too many false positives, this is only done when:
141 141
142=over 4 142=over 4
143 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
144=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.
145
146=item - the primary screen is currently being displayed.
147
148=item - the text cursor is visible.
149 151
150=back 152=back
151 153
152The normal selection mechanism isn't disabled, so quick successive clicks 154The normal selection mechanism isn't disabled, so quick successive clicks
153might interfere with selection creation in harmless ways. 155might interfere with selection creation in harmless ways.
… …
561our $LIBDIR; 563our $LIBDIR;
562our $RESNAME; 564our $RESNAME;
563our $RESCLASS; 565our $RESCLASS;
564our $RXVTNAME; 566our $RXVTNAME;
565 567
566our $NOCHAR = chr 0xfffe; 568our $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
725no warnings 'utf8';
726
723my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; 727my $verbosity = $ENV{URXVT_PERL_VERBOSITY};
724 728
725sub verbose { 729sub 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
… …
1308Replaces the event mask of the pty watcher by the given event mask. Can 1312Replaces the event mask of the pty watcher by the given event mask. Can
1309be used to suppress input and output handling to the pty/tty. See the 1313be used to suppress input and output handling to the pty/tty. See the
1310description of C<< urxvt::timer->events >>. Make sure to always restore 1314description of C<< urxvt::timer->events >>. Make sure to always restore
1311the previous value. 1315the previous value.
1312 1316
1317=item $fd = $term->pty_fd
1318
1319Returns the master file descriptor for the pty in use, or C<-1> if no pty
1320is used.
1321
1313=item $windowid = $term->parent 1322=item $windowid = $term->parent
1314 1323
1315Return the window id of the toplevel window. 1324Return the window id of the toplevel window.
1316 1325
1317=item $windowid = $term->vt 1326=item $windowid = $term->vt
… …
1416If C<$new_text> is specified, it will replace characters in the current 1425If C<$new_text> is specified, it will replace characters in the current
1417line, starting at column C<$start_col> (default C<0>), which is useful 1426line, starting at column C<$start_col> (default C<0>), which is useful
1418to replace only parts of a line. The font index in the rendition will 1427to replace only parts of a line. The font index in the rendition will
1419automatically be updated. 1428automatically be updated.
1420 1429
1421C<$text> is in a special encoding: tabs and wide characters that use 1430C<$text> is in a special encoding: tabs and wide characters that use more
1422more than one cell when displayed are padded with C<$urxvt::NOCHAR> 1431than one cell when displayed are padded with C<$urxvt::NOCHAR> (chr 65535)
1423characters. Characters with combining characters and other characters that 1432characters. Characters with combining characters and other characters that
1424do not fit into the normal tetx encoding will be replaced with characters 1433do not fit into the normal tetx encoding will be replaced with characters
1425in the private use area. 1434in the private use area.
1426 1435
1427You have to obey this encoding when changing text. The advantage is 1436You have to obey this encoding when changing text. The advantage is

Diff Legend

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