From 5075461af23c7016f045450808b4302d4109934f Mon Sep 17 00:00:00 2001
From: Birte Kristina Friesel <derf@finalrewind.org>
Date: Sun, 19 Jan 2025 00:01:45 +0100
Subject: expose connection price offers

---
 bin/dbris | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'bin/dbris')

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 ) {
-- 
cgit v1.2.3