From 0fbd6b8778fa66a7c31df304b436a2f24fa69c26 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 21 Dec 2020 13:51:50 +0100 Subject: remove wagonorder_notes from json output --- bin/db-zugbildung-to-json | 26 +++----------------------- 1 file changed, 3 insertions(+), 23 deletions(-) (limited to 'bin') diff --git a/bin/db-zugbildung-to-json b/bin/db-zugbildung-to-json index 722c618..d6a3832 100755 --- a/bin/db-zugbildung-to-json +++ b/bin/db-zugbildung-to-json @@ -549,26 +549,6 @@ for my $train ( values %map ) { } } -#for my $train_number ( keys %map ) { -# my $tr = $map{$train_number}{route} // q{}; -# $tr =~ s{ - .* - }{ - }; -# my $this = sprintf("\"%d %s\"", $train_number, $tr); -# for my $from ( @{ $map{$train_number}{umlauf}{from} // [] } ) { -# $tr = $map{$from}{route} // q{}; -# $tr =~ s{ - .* - }{ - }; -# $from = sprintf("\"%d %s\"", $from, $tr); -# say "$from -> $this;"; -# } -# for my $to ( @{ $map{$train_number}{umlauf}{to} // [] } ) { -# $tr = $map{$to}{route} // q{}; -# $tr =~ s{ -.*- }{ - }; -# $to = sprintf("\"%d %s\"", $to, $tr); -# say "$this -> $to;"; -# } -#} - -#exit 0; - for my $train_number ( keys %map ) { my $wagon_numbers_ok = 1; my $wagon_types_ok = 1; @@ -623,9 +603,9 @@ for my $train_number ( keys %map ) { # Cleanup -#for my $train (values %map) { -# delete $train->{wagonorder_notes}; -#} +for my $train ( values %map ) { + delete $train->{wagonorder_notes}; +} # broken umlauf (indentation changes on page break) delete $map{104}{cycle}; -- cgit v1.2.3