From 21b2e43991ea639be10656201b68132828a6e230 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Tue, 2 Oct 2012 18:45:08 +0000
Subject: (N) kill KDE like comment even if string doesn't have "\n" at end

thus fixing comment in license text
---
 perl-install/common.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/common.pm')

diff --git a/perl-install/common.pm b/perl-install/common.pm
index 7aea9bc17..ddd471cee 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -63,7 +63,7 @@ sub translate_real {
 sub remove_translate_context {
     my ($s) = @_;
     #- translation with context, kde-like 
-    $s =~ s/^_:.*\n//;
+    $s =~ s/^_:.*(?:\n)?//g;
     $s;
 }
 
-- 
cgit v1.2.1