From 5c2765e6aebc9d862790643bc14a51ccb8fd0990 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Marc=20V=C3=A9ron?= <veron@veron.ch>
Date: Sun, 27 Jul 2014 08:03:23 +0200
Subject: [PATCH] Bug 12705 - News not possible for one sublanguage if two
 sublanguages are installed

To test:
- Install two language variants (e.g. de-DE and de-CH)
- Create OPAC news for each of them
- Verify that they are displayed in OPAC as appropriate
---
 tools/koha-news.pl |   13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/tools/koha-news.pl b/tools/koha-news.pl
index 478308f..d4312a5 100755
--- a/tools/koha-news.pl
+++ b/tools/koha-news.pl
@@ -65,12 +65,15 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
 # get lang list
 my @lang_list;
 my $tlangs = getTranslatedLanguages() ;
+
 foreach my $language ( @$tlangs ) {
-    push @lang_list,
-      {
-        language => $language->{'rfc4646_subtag'},
-        selected => ( $new_detail->{lang} eq $language->{'rfc4646_subtag'} ? 1 : 0 ),
-      };
+    foreach my $sublanguage ( @{$language->{'sublanguages_loop'}} ) {
+        push @lang_list,
+        {  
+            language => $sublanguage->{'rfc4646_subtag'},
+            selected => ( $new_detail->{lang} eq $sublanguage->{'rfc4646_subtag'} ? 1 : 0 ),
+        };
+    }
 }
 
 my $branches = GetBranches;
-- 
1.7.10.4