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.103 by root, Wed Jan 18 11:05:09 2006 UTC vs.
Revision 1.107 by root, Wed Jan 18 21:30:50 2006 UTC

163 163
164Uses per-line display filtering (C<on_line_update>) to underline urls and 164Uses per-line display filtering (C<on_line_update>) to underline urls and
165make them clickable. When middle-clicked, the program specified in the 165make them clickable. When middle-clicked, the program specified in the
166resource C<urlLauncher> (default C<x-www-browser>) will be started with 166resource C<urlLauncher> (default C<x-www-browser>) will be started with
167the URL as first argument. 167the URL as first argument.
168
169=item automove-background
170
171This is basically a one-line extension that dynamically changes the background pixmap offset
172to the window position, in effect creating the same effect as pseudo transparency with
173a custom pixmap. No scaling is supported in this mode. Exmaple:
174
175 @@RXVT_NAME@@ -pixmap background.xpm -pe automove-background
168 176
169=item block-graphics-to-ascii 177=item block-graphics-to-ascii
170 178
171A not very useful example of filtering all text output to the terminal, 179A not very useful example of filtering all text output to the terminal,
172by replacing all line-drawing characters (U+2500 .. U+259F) by a 180by replacing all line-drawing characters (U+2500 .. U+259F) by a
622 my $msg = join "", @_; 630 my $msg = join "", @_;
623 $msg .= "\n" 631 $msg .= "\n"
624 unless $msg =~ /\n$/; 632 unless $msg =~ /\n$/;
625 urxvt::warn ($msg); 633 urxvt::warn ($msg);
626 }; 634 };
627
628 # %ENV is the original startup environment
629 delete $ENV{IFS};
630 delete $ENV{CDPATH};
631 delete $ENV{BASH_ENV};
632 $ENV{PATH} = "/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin:/opt/bin:/opt/sbin";
633} 635}
634 636
635my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; 637my $verbosity = $ENV{URXVT_PERL_VERBOSITY};
636 638
637sub verbose { 639sub verbose {
951Here is a a likely non-exhaustive list of option names, please see the 953Here is a a likely non-exhaustive list of option names, please see the
952source file F</src/optinc.h> to see the actual list: 954source file F</src/optinc.h> to see the actual list:
953 955
954 borderLess console cursorBlink cursorUnderline hold iconic insecure 956 borderLess console cursorBlink cursorUnderline hold iconic insecure
955 intensityStyles jumpScroll loginShell mapAlert meta8 mouseWheelScrollPage 957 intensityStyles jumpScroll loginShell mapAlert meta8 mouseWheelScrollPage
956 pastableTabs pointerBlank reverseVideo scrollBar scrollBar_floating 958 override-redirect pastableTabs pointerBlank reverseVideo scrollBar
957 scrollBar_right scrollTtyKeypress scrollTtyOutput scrollWithBuffer 959 scrollBar_floating scrollBar_right scrollTtyKeypress scrollTtyOutput
958 secondaryScreen secondaryScroll skipBuiltinGlyphs transparent 960 scrollWithBuffer secondaryScreen secondaryScroll skipBuiltinGlyphs
959 tripleclickwords utmpInhibit visualBell 961 transparent tripleclickwords utmpInhibit visualBell
960 962
961=item $value = $term->resource ($name[, $newval]) 963=item $value = $term->resource ($name[, $newval])
962 964
963Returns the current resource value associated with a given name and 965Returns the current resource value associated with a given name and
964optionally sets a new value. Setting values is most useful in the C<init> 966optionally sets a new value. Setting values is most useful in the C<init>
981 983
982 answerbackstring backgroundPixmap backspace_key boldFont boldItalicFont 984 answerbackstring backgroundPixmap backspace_key boldFont boldItalicFont
983 borderLess color cursorBlink cursorUnderline cutchars delete_key 985 borderLess color cursorBlink cursorUnderline cutchars delete_key
984 display_name embed ext_bwidth fade font geometry hold iconName 986 display_name embed ext_bwidth fade font geometry hold iconName
985 imFont imLocale inputMethod insecure int_bwidth intensityStyles 987 imFont imLocale inputMethod insecure int_bwidth intensityStyles
986 italicFont jumpScroll lineSpace loginShell mapAlert menu meta8 modifier 988 italicFont jumpScroll lineSpace loginShell mapAlert meta8 modifier
987 mouseWheelScrollPage name pastableTabs path perl_eval perl_ext_1 perl_ext_2 989 mouseWheelScrollPage name override_redirect pastableTabs path perl_eval
988 perl_lib pointerBlank pointerBlankDelay preeditType print_pipe pty_fd 990 perl_ext_1 perl_ext_2 perl_lib pointerBlank pointerBlankDelay
989 reverseVideo saveLines scrollBar scrollBar_align scrollBar_floating 991 preeditType print_pipe pty_fd reverseVideo saveLines scrollBar
990 scrollBar_right scrollBar_thickness scrollTtyKeypress scrollTtyOutput 992 scrollBar_align scrollBar_floating scrollBar_right scrollBar_thickness
991 scrollWithBuffer scrollstyle secondaryScreen secondaryScroll selectstyle 993 scrollTtyKeypress scrollTtyOutput scrollWithBuffer scrollstyle
992 shade term_name title transparent transparent_all tripleclickwords 994 secondaryScreen secondaryScroll selectstyle shade term_name title
993 utmpInhibit visualBell 995 transient_for transparent transparent_all tripleclickwords utmpInhibit
996 visualBell
994 997
995=cut 998=cut
996 999
997sub resource($$;$) { 1000sub resource($$;$) {
998 my ($self, $name) = (shift, shift); 1001 my ($self, $name) = (shift, shift);
1591 # we can't hope to reproduce the locale algorithm, so nuke LC_ALL and set LC_CTYPE. 1594 # we can't hope to reproduce the locale algorithm, so nuke LC_ALL and set LC_CTYPE.
1592 delete $env->{LC_ALL}; 1595 delete $env->{LC_ALL};
1593 $env->{LC_CTYPE} = $self->{term}->locale; 1596 $env->{LC_CTYPE} = $self->{term}->locale;
1594 1597
1595 urxvt::term->new ($env, "popup", 1598 urxvt::term->new ($env, "popup",
1596 "--perl-lib" => "", "--perl-ext-common" => "", "-pty-fd" => -1, "-sl" => 0, "-b" => 0, 1599 "--perl-lib" => "", "--perl-ext-common" => "",
1600 "-pty-fd" => -1, "-sl" => 0,
1601 "-b" => 1, "-bd" => "grey80", "-bl", "-override-redirect",
1597 "--transient-for" => $self->{term}->parent, 1602 "--transient-for" => $self->{term}->parent,
1598 "-display" => $self->{term}->display_id, 1603 "-display" => $self->{term}->display_id,
1599 "-pe" => "urxvt-popup") 1604 "-pe" => "urxvt-popup")
1600 or die "unable to create popup window\n"; 1605 or die "unable to create popup window\n";
1601} 1606}

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines