mirror of
https://github.com/gryf/tabbedalt.git
synced 2025-12-17 11:30:31 +01:00
Added missing return statements for commands.
This commit is contained in:
@@ -689,11 +689,13 @@ sub move_tab_right {
|
|||||||
sub next_tab {
|
sub next_tab {
|
||||||
my ($self, $params) = @_;
|
my ($self, $params) = @_;
|
||||||
$self->_go_to_tab(1);
|
$self->_go_to_tab(1);
|
||||||
|
return 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub prev_tab {
|
sub prev_tab {
|
||||||
my ($self, $params) = @_;
|
my ($self, $params) = @_;
|
||||||
$self->_go_to_tab(0);
|
$self->_go_to_tab(0);
|
||||||
|
return 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub jump_to_tab {
|
sub jump_to_tab {
|
||||||
@@ -709,7 +711,7 @@ sub jump_to_tab {
|
|||||||
if ($#{$self->{tabs}} >= $nr){
|
if ($#{$self->{tabs}} >= $nr){
|
||||||
$self->make_current ($self->{tabs}[$nr]);
|
$self->make_current ($self->{tabs}[$nr]);
|
||||||
}
|
}
|
||||||
()
|
return 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub _go_to_tab {
|
sub _go_to_tab {
|
||||||
@@ -718,7 +720,6 @@ sub _go_to_tab {
|
|||||||
my ($idx) = grep $self->{tabs}[$_] == $tab, 0 .. $#{ $self->{tabs} };
|
my ($idx) = grep $self->{tabs}[$_] == $tab, 0 .. $#{ $self->{tabs} };
|
||||||
$direction? ++$idx : --$idx;
|
$direction? ++$idx : --$idx;
|
||||||
$self->make_current ($self->{tabs}[$idx % @{ $self->{tabs}}]);
|
$self->make_current ($self->{tabs}[$idx % @{ $self->{tabs}}]);
|
||||||
return 1;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
sub _move_tab {
|
sub _move_tab {
|
||||||
|
|||||||
Reference in New Issue
Block a user