summaryrefslogtreecommitdiff
path: root/lib/Travel
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2014-01-07 10:49:16 +0100
committerDaniel Friesel <derf@finalrewind.org>2014-01-07 10:49:16 +0100
commitd1ead7ba9bc3bd442f1cc5bb5bf97a46b793b62f (patch)
treedfed001b06e7e7300fe589076c83862a6a0f633d /lib/Travel
parentd63bafea6ce6ba6e9551597327f71f69c79062b7 (diff)
efa / VRR.pm: Handle UTF8 / decoded input with non-ASCII chars
Diffstat (limited to 'lib/Travel')
-rw-r--r--lib/Travel/Routing/DE/VRR.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/Travel/Routing/DE/VRR.pm b/lib/Travel/Routing/DE/VRR.pm
index 29a30b3..28dcf58 100644
--- a/lib/Travel/Routing/DE/VRR.pm
+++ b/lib/Travel/Routing/DE/VRR.pm
@@ -7,7 +7,7 @@ use 5.010;
no if $] >= 5.018, warnings => "experimental::smartmatch";
use Carp qw(cluck);
-use Encode qw(decode);
+use Encode qw(decode encode);
use Travel::Routing::DE::VRR::Route;
use LWP::UserAgent;
use XML::LibXML;
@@ -236,6 +236,9 @@ sub place {
);
}
+ $place = encode( 'ISO-8859-15', $place );
+ $stop = encode( 'ISO-8859-15', $stop );
+
$type //= 'stop';
@{ $self->{post} }{ "place_${which}", "name_${which}" } = ( $place, $stop );