Skip to content
Snippets Groups Projects
Commit f4cee072 authored by anonym's avatar anonym
Browse files

Fix test suite for removal of Claws Mail preset.

parent efc60144
No related branches found
No related tags found
No related merge requests found
...@@ -50,7 +50,7 @@ Feature: configuration model ...@@ -50,7 +50,7 @@ Feature: configuration model
Scenario: merge empty file with default presets Scenario: merge empty file with default presets
Given the file is empty Given the file is empty
When I merge the presets and the file When I merge the presets and the file
Then the list of configuration atoms should contain 14 elements Then the list of configuration atoms should contain 13 elements
And there should be 1 enabled configuration line And there should be 1 enabled configuration line
Scenario: merge non-empty file with enabled-by-default preset in Scenario: merge non-empty file with enabled-by-default preset in
...@@ -60,7 +60,7 @@ Feature: configuration model ...@@ -60,7 +60,7 @@ Feature: configuration model
/home/amnesia/.myapp source=myapp /home/amnesia/.myapp source=myapp
""" """
When I merge the presets and the file When I merge the presets and the file
Then the list of configuration atoms should contain 15 elements Then the list of configuration atoms should contain 14 elements
And there should be 3 enabled configuration lines And there should be 3 enabled configuration lines
Scenario: merge non-empty file with disabled-by-default preset in Scenario: merge non-empty file with disabled-by-default preset in
...@@ -70,7 +70,7 @@ Feature: configuration model ...@@ -70,7 +70,7 @@ Feature: configuration model
/home/amnesia/.myapp source=myapp /home/amnesia/.myapp source=myapp
""" """
When I merge the presets and the file When I merge the presets and the file
Then the list of configuration atoms should contain 15 elements Then the list of configuration atoms should contain 14 elements
And there should be 3 enabled configuration lines And there should be 3 enabled configuration lines
Scenario: read and write file that contains a three-columns line Scenario: read and write file that contains a three-columns line
......
...@@ -7,9 +7,9 @@ Feature: configure step ...@@ -7,9 +7,9 @@ Feature: configure step
Given I have a Configuration object Given I have a Configuration object
And I have a Step::Configure object And I have a Step::Configure object
Then I should have a defined Step::Configure object Then I should have a defined Step::Configure object
And the list of item buttons should contain 14 elements And the list of item buttons should contain 13 elements
And the list of configuration atoms should contain 14 elements And the list of configuration atoms should contain 13 elements
And the list box should have 14 children And the list box should have 13 children
And there should be 1 active buttons And there should be 1 active buttons
And every active button's atom should be enabled And every active button's atom should be enabled
And every inactive button's atom should be disabled And every inactive button's atom should be disabled
......
...@@ -34,8 +34,8 @@ describe 'A configuration object' => sub { ...@@ -34,8 +34,8 @@ describe 'A configuration object' => sub {
config_file_path => file($config_filename) config_file_path => file($config_filename)
); );
}; };
it 'has 14 atoms' => sub { it 'has 13 atoms' => sub {
is(scalar($configuration->all_atoms), 14); is(scalar($configuration->all_atoms), 13);
}; };
it 'has 1 enabled atom' => sub { it 'has 1 enabled atom' => sub {
is(scalar($configuration->all_enabled_atoms), 1); is(scalar($configuration->all_enabled_atoms), 1);
...@@ -59,8 +59,8 @@ EOF ...@@ -59,8 +59,8 @@ EOF
config_file_path => file($config_filename) config_file_path => file($config_filename)
); );
}; };
it 'has 15 atoms' => sub { it 'has 14 atoms' => sub {
is(scalar($configuration->all_atoms), 15); is(scalar($configuration->all_atoms), 14);
}; };
it 'has 4 enabled atoms' => sub { it 'has 4 enabled atoms' => sub {
is(scalar($configuration->all_enabled_atoms), 4); is(scalar($configuration->all_enabled_atoms), 4);
......
...@@ -14,8 +14,8 @@ describe 'A configuration presets object' => sub { ...@@ -14,8 +14,8 @@ describe 'A configuration presets object' => sub {
it 'can return all presets' => sub { it 'can return all presets' => sub {
ok($presets->all); ok($presets->all);
}; };
it 'has 14 elements' => sub { it 'has 13 elements' => sub {
is(scalar($presets->all), 14); is(scalar($presets->all), 13);
}; };
it 'has a GnuPG preset' => sub { it 'has a GnuPG preset' => sub {
is(scalar(grep { $_->name eq 'GnuPG' } $presets->all), 1); is(scalar(grep { $_->name eq 'GnuPG' } $presets->all), 1);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment