Merge remote branch 'kc/master' into new/enh/bug_5917

[koha_gimpoz] / admin / categorie.pl

diff --git a/admin/categorie.pl b/admin/categorie.pl
index bda7674..4a5d683 100755 (executable)
--- a/admin/categorie.pl
+++ b/admin/categorie.pl
@@ -240,9 +240,11 @@ sub _get_brief_messaging_prefs {
         my $pref = C4::Members::Messaging::GetMessagingPreferences( { categorycode => $categorycode,
                                                                     message_name       => $option->{'message_name'} } );
         next unless  $pref->{'transports'};
-        my $brief_pref = { message_attribute_id => $option->{'message_attribute_id'},
-                           message_name => $option->{'message_name'},
-                         };
+        my $brief_pref = {
+            message_attribute_id    => $option->{'message_attribute_id'},
+            message_name            => $option->{'message_name'},
+            $option->{'message_name'} => 1
+        };
         foreach my $transport ( @{$pref->{'transports'}} ) {
             push @{ $brief_pref->{'transports'} }, { transport => $transport };
         }