diff options
| -rw-r--r-- | index.pl | 3 | 
1 files changed, 0 insertions, 3 deletions
@@ -476,13 +476,10 @@ get '/2ddata.tsv' => sub {  		$dbres = $newres;  		for my $row ( @{$dbres} ) { -			say $row->[0];  			splice( @{$row}, 0, 1,  				$weekdays[ substr( $row->[0], 0, 1 ) ] . q{ }  				  . substr( $row->[0], 2 ) ); -			say $row->[0];  		} -		say scalar @{$dbres};  		# Fix weekday ordering (start on Monday, not Sunday)  		@{$dbres} = ( @{$dbres}[ 1 * 24 .. 7 * 24 - 1 ], @{$dbres}[ 0 .. 23 ] );  | 
