Unverified Commit 5d20bf15 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

resolve_sb_template: escape / in station name

parent a7c31b64

lib/Travelynx.pm

+3 −2
Original line number Diff line number Diff line
@@ -1258,8 +1258,9 @@ sub startup { 
		'resolve_sb_template' => sub {

			my ( $self, $template, %opt ) = @_;

			my $ret  = $template;

			my $name = $opt{name} =~ s{/}{%2F}gr;

			$ret =~ s{[{]eva[}]}{$opt{eva}}g;

			$ret =~ s{[{]name[}]}{$opt{name}}g;

			$ret =~ s{[{]name[}]}{$name}g;

			$ret =~ s{[{]tt[}]}{$opt{tt}}g;

			$ret =~ s{[{]tn[}]}{$opt{tn}}g;

			$ret =~ s{[{]id[}]}{$opt{id}}g;