expose connection price offers

1 files changed, 5 insertions, 3 deletions

diff --git a/bin/dbris b/bin/dbris
index f30cdca..d6a642d 100755
--- a/bin/dbris
+++ b/bin/dbris
@@ -219,13 +219,15 @@ for my $connection ( $ris->connections ) {
 
 	say q{};
 	printf(
-		"%s  (%02d:%02d)  %s  %s%s\n\n",
-		$connection->dep
-		? $connection->dep->strftime('%d.%m. %H:%M')
+		"%s  (%02d:%02d)  %s  %s%s%s\n\n",
+		$connection->dep ? $connection->dep->strftime('%d.%m. %H:%M')
 		: q{??.??. ??:??},
 		$connection->duration->in_units( 'hours', 'minutes' ),
 		$connection->arr ? $connection->arr->strftime('%H:%M') : q{??:??},
 		format_occupancy($connection),
+		defined $connection->price
+		? sprintf( '  %s %s', $connection->price, $connection->price_unit )
+		: q{},
 		$header,
 	);
 	for my $segment ( $connection->segments ) {