Skip to content

Commit

Permalink
JUNK Backups: tidy up needs
Browse files Browse the repository at this point in the history
  • Loading branch information
elliefm committed Sep 6, 2024
1 parent 7ba1c5c commit 5a76804
Showing 1 changed file with 11 additions and 9 deletions.
20 changes: 11 additions & 9 deletions cassandane/Cassandane/Cyrus/Backups.pm
Original file line number Diff line number Diff line change
Expand Up @@ -54,7 +54,9 @@ $Data::Dumper::Sortkeys = 1;
sub new
{
my $class = shift;
return $class->SUPER::new({ backups => 1, adminstore => 1 }, @_);
my $self = $class->SUPER::new({ backups => 1, adminstore => 1 }, @_);
$self->{needs}->{component}->{backup} = 1;
return $self;
}

sub set_up
Expand Down Expand Up @@ -244,7 +246,7 @@ sub assert_backups_not_exist
}

sub test_aaasetup
:min_version_3_0 :needs_component_backup
:min_version_3_0
{
my ($self) = @_;

Expand All @@ -253,7 +255,7 @@ sub test_aaasetup
}

sub test_basic
:min_version_3_0 :needs_component_backup
:min_version_3_0
{
my ($self) = @_;

Expand All @@ -271,7 +273,7 @@ sub test_basic
}

sub test_messages
:min_version_3_0 :needs_component_backup
:min_version_3_0
{
my ($self) = @_;

Expand Down Expand Up @@ -304,7 +306,7 @@ sub test_messages
}

sub test_shared_mailbox
:min_version_3_0 :needs_component_backup :NoAltNamespace
:min_version_3_0 :NoAltNamespace
{
my ($self) = @_;

Expand Down Expand Up @@ -358,7 +360,7 @@ sub test_shared_mailbox
}

sub test_deleted_mailbox
:min_version_3_0 :needs_component_backup :NoAltNamespace
:min_version_3_0 :NoAltNamespace
{
my ($self) = @_;

Expand Down Expand Up @@ -410,7 +412,7 @@ sub test_deleted_mailbox
}

sub test_locks
:min_version_3_0 :needs_component_backup
:min_version_3_0
{
my ($self) = @_;

Expand Down Expand Up @@ -455,7 +457,7 @@ sub test_locks
}

sub test_xbackup
:min_version_3_0 :UnixHierarchySep :VirtDomains :needs_component_backup
:min_version_3_0 :UnixHierarchySep :VirtDomains
{
my ($self) = @_;
my $id = 1;
Expand Down Expand Up @@ -549,7 +551,7 @@ sub test_xbackup
}

sub test_xbackup_shared
:min_version_3_0 :UnixHierarchySep :VirtDomains :needs_component_backup
:min_version_3_0 :UnixHierarchySep :VirtDomains
{
my ($self) = @_;
my $id = 1;
Expand Down

0 comments on commit 5a76804

Please sign in to comment.