From 91a0e1fbe110cd7a5c69506e16888376e380b53a Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 15 Oct 2015 16:06:02 +0200 Subject: shorten_destination: add special case for Düsseldorf (prefix "D-", not "Düsseldorf") MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- index.pl | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/index.pl b/index.pl index afa3c27..4951878 100644 --- a/index.pl +++ b/index.pl @@ -207,6 +207,10 @@ sub shorten_destination { $dest =~ s{ ^ $city \s }{}ix; } + if ( $city =~ m{ ^ ( D | Duesseldorf | Düsseldorf ) $ }ix ) { + $dest =~ s{ ^ D - }{}ix; + } + if ( length($dest) > 20 ) { $dest =~ s{^Dortmund}{DO} or $dest =~ s{^Duisburg}{DU} -- cgit v1.2.3