Bugfix: extra length on restart didn't work correctly for negative values. #654
This commit is contained in:
parent
8cd8e8b209
commit
e372372a5d
1 changed files with 4 additions and 1 deletions
|
@ -1,4 +1,4 @@
|
||||||
use Test::More tests => 12;
|
use Test::More tests => 16;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
|
@ -96,6 +96,9 @@ my $retract_tests = sub {
|
||||||
$conf->set('retract_restart_extra', [1]);
|
$conf->set('retract_restart_extra', [1]);
|
||||||
ok $test->($conf), "restart extra length$descr";
|
ok $test->($conf), "restart extra length$descr";
|
||||||
|
|
||||||
|
$conf->set('retract_restart_extra', [-1]);
|
||||||
|
ok $test->($conf), "negative restart extra length$descr";
|
||||||
|
|
||||||
$conf->set('retract_lift', [1]);
|
$conf->set('retract_lift', [1]);
|
||||||
ok $test->($conf), "lift$descr";
|
ok $test->($conf), "lift$descr";
|
||||||
};
|
};
|
||||||
|
|
Loading…
Add table
Reference in a new issue