From: root Date: Mon, 9 Jan 2006 01:21:43 +0000 (+0000) Subject: *** empty log message *** X-Git-Url: http://git.openbox.org/?a=commitdiff_plain;h=70c9db0999a3ed15b97f7ca85fc195bf5b08fe7c;p=dana%2Furxvt.git *** empty log message *** --- diff --git a/src/perl/selection-popup b/src/perl/selection-popup index 3adfd9d5..3233d47f 100644 --- a/src/perl/selection-popup +++ b/src/perl/selection-popup @@ -35,10 +35,14 @@ sub on_button_press { }; for ($text) { + $add_button->("rot13" => sub { y/A-Za-z/N-ZA-Mn-za-m/ }); + /^(\S+):(\d+):?$/ and $add_button->("vi-commands to load '$1'" => sub { s/^(\S+):(\d+):?$/\x1b:e $1\x0d:$2\x0d/ }); + /%[0-9a-fA-F]{2}/ && !/%[^0-9a-fA-F]/ && !/%.[^0-9a-fA-F]/ and $add_button->("uri unescape" => sub { s/%([0-9a-fA-F]{2})/chr hex $1/ge }); + /^(http|ftp|telnet|irc|news):\// and $add_button->("run x-www-browser" => sub { system "x-www-browser \Q$_\E &" }); } diff --git a/src/urxvt.pm b/src/urxvt.pm index 10b057ac..6b908ec7 100644 --- a/src/urxvt.pm +++ b/src/urxvt.pm @@ -431,8 +431,10 @@ BEGIN { urxvt::warn ($msg); }; - $ENV{PATH} = "/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin:/opt/bin:/opt/sbin"; + delete $ENV{IFS}; delete $ENV{CDPATH}; + delete $ENV{BASH_ENV}; + $ENV{PATH} = "/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin:/opt/bin:/opt/sbin"; } my @hook_count;