initial support for stop messages (todo: documentation) (closes #6)

1 files changed, 5 insertions, 0 deletions

diff --git a/bin/ura-m b/bin/ura-m
index 7ff4c65..3111cda 100755
--- a/bin/ura-m
+++ b/bin/ura-m
@@ -93,6 +93,7 @@ my $status = Travel::Status::DE::URA->new(
 	developer_mode => $developer_mode,
 	ura_base       => $ura_base,
 	ura_version    => $ura_version,
+	with_messages  => 1,
 );
 
 sub show_help {
@@ -211,6 +212,10 @@ sub show_results {
 	my $dt_format
 	  = DateTime::Format::Duration->new( pattern => $strfrel_format );
 
+	for my $m ( $status->messages_by_stop_name($stop_name) ) {
+		printf( "# %s\n", $m );
+	}
+
 	for my $d (
 		$status->results(
 			calculate_routes => $calculate_routes,