[ViewVC] Diff of: cvs/rxvt-unicode/src/urxvt.pm

Comparing rxvt-unicode/src/urxvt.pm (file contents):
Revision 1.64 by root, Mon Jan 9 06:29:47 2006 UTC vs.
Revision 1.67 by root, Mon Jan 9 19:29:06 2006 UTC

 =item $lines_in_scrollback = $term->nsaved
 Return various integers describing terminal characteristics.
+=item $lc_ctype = $term->locale
+Returns the LC_CTYPE category string used by this rxvt-unicode.
+=item $x_display = $term->display_id
+Return the DISPLAY used by rxvt-unicode.
 =item $modifiermask = $term->ModLevel3Mask
 =item $modifiermask = $term->ModMetaMask
 =item $modifiermask = $term->ModNumLockMask
 }
 sub add_separator {
    my ($self, $sep) = @_;
-   $sep ||= "═";
+   $sep ||= "=";
    $self->add_item ({
       rend => { normal => "\x1b[0;30;47m", hover => "\x1b[0;30;47m", active => "\x1b[0;30;47m" },
       text => "",
-      render => sub { $sep x $urxvt::TERM->ncol },
+      render => sub { $sep x $self->{term}->ncol },
       activate => sub { },
    });
 }
 sub add_title {
 sub show {
    my ($self) = @_;
    local $urxvt::popup::self = $self;
+   local $ENV{LC_ALL} = $self->{term}->locale;
    urxvt->new ("--perl-lib" => "", "--perl-ext-common" => "", "-pty-fd" => -1, "-sl" => 0, "-b" => 0,
                "--transient-for" => $self->{term}->parent,
                "-display" => $self->{term}->display_id,
                "-pe" => "urxvt-popup")

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