do not allow -wc and -lp together, can cause bugs

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 512a74252db566e4a0f6f893412c083e40bf7f43..3c8bd757c4d7e468a23b271a2c24a9819261a6ad 100644 (file)
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -6002,6 +6002,13 @@ with these flags.
 EOM
             $rOpts->{'line-up-parentheses'} = 0;
         }
+
+        if ( $rOpts->{'whitespace-cycle'} ) {
+            Warn(<<EOM);
+Conflict: -wc cannot currently be used with the -lp option; ignoring -wc
+EOM
+            $rOpts->{'whitespace-cycle'} = 0;
+        }
     }
 
     # At present, tabs are not compatible with the line-up-parentheses style