summaryrefslogtreecommitdiffstats
path: root/lib/Debian/Debhelper/Sequence.pm
diff options
context:
space:
mode:
authorDaniel Baumann <daniel.baumann@progress-linux.org>2024-06-17 16:37:30 +0000
committerDaniel Baumann <daniel.baumann@progress-linux.org>2024-06-17 16:37:30 +0000
commitdbf14b11a1c911e6832e5518ae9c3e406245edaa (patch)
treef2b58ca7d37f97bf2c49862a31951aa103c06b12 /lib/Debian/Debhelper/Sequence.pm
parentReleasing progress-linux version 13.15.3-0.0~progress7.99u1. (diff)
downloaddebhelper-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.pm5
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 {