added xor to builtin -sak keywords; should have been

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index e723bc93269bcd87fad57dfd6e04cd912b1471df..dedf72f82a460037adc1ac429f854854ab06c677 100644 (file)
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -5919,7 +5919,7 @@ EOM
 
     # default keywords for which space is introduced before an opening paren
     # (at present, including them messes up vertical alignment)
-    my @sak = qw(my local our and or err eq ne if else elsif until
+    my @sak = qw(my local our and or xor err eq ne if else elsif until
       unless while for foreach return switch case given when catch);
     %space_after_keyword = map { $_ => 1 } @sak;