Removed deprecated 'pretty' flag
Change-Id: I63272027a955d85574fe24be18ba64ec56200959
diff --git a/lib/KorAP/XML/Batch/File.pm b/lib/KorAP/XML/Batch/File.pm
index 6dc5d7b..5c1bea9 100644
--- a/lib/KorAP/XML/Batch/File.pm
+++ b/lib/KorAP/XML/Batch/File.pm
@@ -22,7 +22,6 @@
koral => $param{koral},
non_word_tokens => $param{non_word_tokens},
non_verbal_tokens => $param{non_verbal_tokens},
- pretty => $param{pretty},
gzip => $param{gzip} // 0
}, $class;
};
@@ -73,11 +72,7 @@
};
my $file;
- my $print_text = (
- $self->{pretty} ?
- $tokens->to_pretty_json($self->{koral}) :
- $tokens->to_json($self->{koral})
- );
+ my $print_text = $tokens->to_json($self->{koral});
# There is an output file given
if ($output) {
@@ -200,11 +195,6 @@
A L<Mojo::Log> compatible log object.
-=item pretty
-
-Pretty print the output JSON.
-Defaults to C<false>.
-
=item gzip
Compress the output using Gzip.
diff --git a/lib/KorAP/XML/Tokenizer.pm b/lib/KorAP/XML/Tokenizer.pm
index ffd9f80..7e72968 100644
--- a/lib/KorAP/XML/Tokenizer.pm
+++ b/lib/KorAP/XML/Tokenizer.pm
@@ -608,13 +608,6 @@
encode_json($self->to_data($version));
};
-
-sub to_pretty_json {
- my ($self, $version) = @_;
- JSON::XS->new->pretty->encode($self->to_data($version));
-};
-
-
# Remove diacritics from a unicode string
sub remove_diacritics {
use utf8;