findsub: Bindestriche in Übersetzung in Unterstriche umwandeln

Ansonsten wird bei Original 'PDF preview' und Übersetzung
"PDF-Vorschau" die Rückübersetzung nicht gefunden.

diff --git a/SL/Locale.pm b/SL/Locale.pm
index 1f0c9f33d9eaea68c793aa11d5638cab3922ba58..e2d3744376cdada35bbd3bdd5cbc4d8b08f77993 100644 (file)
--- a/SL/Locale.pm
+++ b/SL/Locale.pm
@@ -241,7 +241,7 @@ sub findsub {
       $original    =~ s/_+/_/g;
 
       $translation =  lc $translation;
       $original    =~ s/_+/_/g;
 
       $translation =  lc $translation;

-      $translation =~ s/\s+/_/g;
+      $translation =~ s/[\s\-]+/_/g;

 
       $self->{texts_reverse}->{$translation} ||= [ ];
       push @{ $self->{texts_reverse}->{$translation} }, $original;
 
       $self->{texts_reverse}->{$translation} ||= [ ];
       push @{ $self->{texts_reverse}->{$translation} }, $original;