From 642d15dd0286fccba9e86f1e97b0781e1f5b2869 Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <moritz@bunkus.org>
Date: Thu, 28 Oct 2010 22:34:21 +0200
Subject: [PATCH] =?utf8?q?Funktionsnamensaufl=C3=B6sung:=20=C3=9Cbersetzun?=
 =?utf8?q?g=20vor=20Nachschlagen=20so=20umwandeln,=20wie=20sie=20auch=20f?=
 =?utf8?q?=C3=BCr=20die=20Hash-Keys=20umgewandelt=20werden?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Ansonsten werden Funktionen nicht gefunden, deren Übersetzung
Leerzeichen enthält (z.B. "PDF exportieren"). Der Hash-Key dafür ist
$self->{texts_reverse}->{"pdf_exportieren"}, aber der Lookup geschieht
gegen $self->{texts_reverse}->{"pdf exportieren"}.
---
 SL/Locale.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/SL/Locale.pm b/SL/Locale.pm
index e2d374437..e9967396c 100644
--- a/SL/Locale.pm
+++ b/SL/Locale.pm
@@ -232,6 +232,7 @@ sub findsub {
 
   my ($self, $text) = @_;
   my $text_rev      = lc $self->{iconv_reverse}->convert($text);
+  $text_rev         =~ s/[\s\-]+/_/g;
 
   if (!$self->{texts_reverse}) {
     $self->{texts_reverse} = { };
-- 
2.20.1