From e5ac4b52e787c213a200e7b23aadf992e94bd379 Mon Sep 17 00:00:00 2001
From: Nahuel ANGELINETTI <nahuel.angelinetti@biblibre.com>
Date: Tue, 13 Jan 2009 11:33:54 +0100
Subject: [PATCH] Format marc notes

this patch add a filter to notes, it transform \n in <br />

Signed-off-by: Henri-Damien LAURENT <henridamien@koha-fr.org>
---
 C4/Biblio.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index 3b2ffd4642..62e2e9215b 100644
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -1083,6 +1083,8 @@ sub GetMarcNotes {
     my $marcnote;
     foreach my $field ( $record->field($scope) ) {
         my $value = $field->as_string();
+        $value =~ s/\n/<br \/>/g ;
+
         if ( $note ne "" ) {
             $marcnote = { marcnote => $note, };
             push @marcnotes, $marcnote;
-- 
2.39.5