diff options
author | Daniel Baumann <daniel.baumann@progress-linux.org> | 2024-06-17 16:37:30 +0000 |
---|---|---|
committer | Daniel Baumann <daniel.baumann@progress-linux.org> | 2024-06-17 16:37:30 +0000 |
commit | dbf14b11a1c911e6832e5518ae9c3e406245edaa (patch) | |
tree | f2b58ca7d37f97bf2c49862a31951aa103c06b12 /lib/Debian/Debhelper/Sequence.pm | |
parent | Releasing progress-linux version 13.15.3-0.0~progress7.99u1. (diff) | |
download | debhelper-dbf14b11a1c911e6832e5518ae9c3e406245edaa.tar.xz debhelper-dbf14b11a1c911e6832e5518ae9c3e406245edaa.zip |
Merging upstream version 13.16.
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 'lib/Debian/Debhelper/Sequence.pm')
-rw-r--r-- | lib/Debian/Debhelper/Sequence.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/Debian/Debhelper/Sequence.pm b/lib/Debian/Debhelper/Sequence.pm index ba627f4..cefa4f7 100644 --- a/lib/Debian/Debhelper/Sequence.pm +++ b/lib/Debian/Debhelper/Sequence.pm @@ -74,8 +74,9 @@ sub _insert { sub remove_command { my ($this, $command) = @_; - $this->{'_cmds'} = [grep { $_->{'command'} ne $command } @{$this->{'_cmds'}}]; - return; + my $cmds = $this->{'_cmds'}; + $this->{'_cmds'} = [grep { $_->{'command'} ne $command } @{$cmds}]; + return scalar(@{$this->{'_cmds'}}) < scalar(@{$cmds}); } sub add_command_at_start { |