summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/Travel/Status/DE/IRIS.pm30
1 files changed, 15 insertions, 15 deletions
diff --git a/lib/Travel/Status/DE/IRIS.pm b/lib/Travel/Status/DE/IRIS.pm
index ffc82b4..677c671 100644
--- a/lib/Travel/Status/DE/IRIS.pm
+++ b/lib/Travel/Status/DE/IRIS.pm
@@ -237,11 +237,11 @@ sub new {
for my $ref (@related_stations) {
- # We (the parent) perform transfer processing, so child requests must not
- # do it themselves. Otherwise, trains from child requests will be
- # processed twice and may be lost.
- # Similarly, child requests must not perform requests to related
- # stations -- we're already doing that right now.
+ # We (the parent) perform transfer processing, so child requests must not
+ # do it themselves. Otherwise, trains from child requests will be
+ # processed twice and may be lost.
+ # Similarly, child requests must not perform requests to related
+ # stations -- we're already doing that right now.
my $ref_status = Travel::Status::DE::IRIS->new(
datetime => $self->{datetime},
developer_mode => $self->{developer_mode},
@@ -798,13 +798,13 @@ sub parse_realtime {
my $msgid = $e_m->getAttribute('id');
my $ts = $e_m->getAttribute('ts');
- # 0 and 1 (with key "f") are related to canceled trains and
- # do not appear to hold information (or at least none we can access).
- # All observed cases of message ID 900 were related to bus
- # connections ("Anschlussbus wartet"). We can't access which bus
- # it refers to, so we don't show that either.
- # ID 1000 is a generic free text message, which (as we lack access
- # to the text itself) is not helpful either.
+ # 0 and 1 (with key "f") are related to canceled trains and
+ # do not appear to hold information (or at least none we can access).
+ # All observed cases of message ID 900 were related to bus
+ # connections ("Anschlussbus wartet"). We can't access which bus
+ # it refers to, so we don't show that either.
+ # ID 1000 is a generic free text message, which (as we lack access
+ # to the text itself) is not helpful either.
if ( defined $value and $value > 1 and $value < 100 ) {
$messages{$msgid} = [ $ts, $type, $value ];
}
@@ -824,9 +824,9 @@ sub parse_realtime {
type => $e_ref->getAttribute('c'), # S/ICE/ERB/...
line_no => $e_ref->getAttribute('l'), # 1 -> S1, ...
- #unknown_t => $e_ref->getAttribute('t'), # p
- #unknown_o => $e_ref->getAttribute('o'), # owner: 03/80/R2/...
- # TODO ps='a' -> rerouted and normally unscheduled train?
+ #unknown_t => $e_ref->getAttribute('t'), # p
+ #unknown_o => $e_ref->getAttribute('o'), # owner: 03/80/R2/...
+ # TODO ps='a' -> rerouted and normally unscheduled train?
);
}
if ($e_ar) {