summaryrefslogtreecommitdiff
path: root/t/30-invalid-xml.t
diff options
context:
space:
mode:
Diffstat (limited to 't/30-invalid-xml.t')
-rwxr-xr-xt/30-invalid-xml.t32
1 files changed, 0 insertions, 32 deletions
diff --git a/t/30-invalid-xml.t b/t/30-invalid-xml.t
deleted file mode 100755
index f8f7d58..0000000
--- a/t/30-invalid-xml.t
+++ /dev/null
@@ -1,32 +0,0 @@
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use 5.020;
-
-use utf8;
-
-use File::Slurp qw(read_file);
-use Test::More tests => 2;
-
-use Travel::Status::DE::HAFAS;
-
-my $xml = 'lol';
-
-my $status = Travel::Status::DE::HAFAS->new(
- service => 'NASA',
- station => 'Berlin Jannowitzbrücke',
- xml => $xml
-);
-
-is( scalar $status->results,
- 0, 'no results on valid XML with invalid HAFAS data' );
-
-$xml = 'lol<';
-
-$status = Travel::Status::DE::HAFAS->new(
- service => 'NASA',
- station => 'Berlin Jannowitzbrücke',
- xml => $xml
-);
-
-is( scalar $status->results, 0, 'no results on invalid XML' );