--- rxvt-unicode/src/perl/tabbed 2011/11/20 11:09:22 1.27 +++ rxvt-unicode/src/perl/tabbed 2012/01/09 17:49:00 1.29 @@ -46,8 +46,6 @@ sub new_tab { my ($self, @argv) = @_; - my $offset = $self->fheight; - # save a backlink to us, make sure tabbed is inactive push @urxvt::TERM_INIT, sub { my ($term) = @_; @@ -81,12 +79,14 @@ $tab->XMoveResizeWindow ( $tab->parent, 0, $self->{tabheight} + 1, - $self->width, $self->height - $self->{tabheight} + $self->width, + $self->height - $self->{tabheight} + 2 * $tab->int_bwidth ); $tab->XMoveResizeWindow ( $tab->parent, 0, $self->{tabheight}, - $self->width, $self->height - $self->{tabheight} + $self->width, + $self->height - $self->{tabheight} + 2 * $tab->int_bwidth ); }