add -j / --with-jid option

2 files changed, 12 insertions, 7 deletions

diff --git a/lib/Travel/Status/DE/EFA.pm b/lib/Travel/Status/DE/EFA.pm
index 1c3bcfc..e2d7e18 100644
--- a/lib/Travel/Status/DE/EFA.pm
+++ b/lib/Travel/Status/DE/EFA.pm
@@ -510,6 +510,9 @@ sub parse_departure {
 		platform       => $departure->{platform},
 		platform_name  => $departure->{platformName},
 		platform_type  => $departure->{pointType},
+		key            => $departure->{servingLine}{key},
+		stateless      => $departure->{servingLine}{stateless},
+		stop_id        => $departure->{stopID},
 		line           => $departure->{servingLine}{symbol},
 		train_type     => $departure->{servingLine}{trainType},
 		train_name     => $departure->{servingLine}{trainName},
diff --git a/lib/Travel/Status/DE/EFA/Departure.pm b/lib/Travel/Status/DE/EFA/Departure.pm
index 802f84e..7f10e53 100644
--- a/lib/Travel/Status/DE/EFA/Departure.pm
+++ b/lib/Travel/Status/DE/EFA/Departure.pm
@@ -9,9 +9,9 @@ use parent 'Class::Accessor';
 our $VERSION = '2.02';
 
 Travel::Status::DE::EFA::Departure->mk_ro_accessors(
-	qw(countdown datetime delay destination is_cancelled key line lineref
-	  mot occupancy operator origin platform platform_db platform_name
-	  rt_datetime sched_datetime train_type train_name train_no type)
+	qw(countdown datetime delay destination is_cancelled key line lineref mot
+	  occupancy operator origin platform platform_db platform_name rt_datetime
+	  sched_datetime stateless stop_id train_type train_name train_no type)
 );
 
 my @mot_mapping = qw{
@@ -189,10 +189,8 @@ may be recent news related to the line's schedule.
 
 =item $departure->key
 
-Unknown.  Unlike the name may suggest, this is not a unique key / UUID for a
-departure: On the same day, different lines departing at the same station
-may have the same key.  It might, however, be unique when combined with the
-B<line> information.
+Key of this departure of the corresponding line. Unique for a given day when
+combined with B<stateless>.
 
 =item $departure->line
 
@@ -262,6 +260,10 @@ realtime data. Undef if unknown / unavailable.
 
 DateTime(3pm) object holding the scheduled departure date and time.
 
+=item $departure->stateless
+
+Unique line identifier.
+
 =item $departure->train_type
 
 Train type, e.g. "ICE". Typically only defined for long-distance trains.