| Subject: | module is out-of-date with reality |
1. New options have been added to Perl::Tidy, which are unaccounted for
2. You do not ignore ~/.perltidyrc, causing default option values to differ
--- a/lib/PerlTidy/t/Options.t 2008-06-21 03:14:18.000000000 +0200
+++ b/lib/PerlTidy/t/Options.t 2013-07-15 09:05:40.341187353 +0200
@@ -53,12 +53,15 @@ is(PerlTidy::Options->getSection(name =>
is(PerlTidy::Options->getSection(name => 'add-newlines'), '5. Linebreak controls', 'name, value, section');
-is_deeply([PerlTidy::Options->getEntries(section => '1. Basic formatting options')],
+is_deeply([sort PerlTidy::Options->getEntries(section => '1. Basic formatting options')],
[
- 'indent-columns',
'check-syntax',
+ 'default-tabsize',
+ 'indent-columns',
'maximum-line-length',
'perl-syntax-check-flags',
+ 'variable-maximum-line-length',
+ 'whitespace-cycle',
],
'required entries',
);
@@ -133,7 +136,7 @@ is(PerlTidy::Options->getDefaultValue(en
is(PerlTidy::Options->getDefaultValue(entry => 'output-line-ending'), 'unix', 'fake a unix platform');
}
-is(PerlTidy::Options->getDefaultValue(entry => 'closing-token-indentation'), 0, 'default token indentation');
+is(PerlTidy::Options->getDefaultValue(entry => 'closing-token-indentation'), 0, 'TODO: default token indentation');
# test getType