From: Matthias Meusburger <[email protected]>
---
cataloguing/merge.pl | 4 ++++
1 files changed, 4 insertions(+), 0 deletions(-)
diff --git a/cataloguing/merge.pl b/cataloguing/merge.pl
index be84df5..6398016 100755
--- a/cataloguing/merge.pl
+++ b/cataloguing/merge.pl
@@ -56,6 +56,10 @@ if ($merge) {
my $record = TransformHtmlToMarc( \...@params , $input );
my $tobiblio = $input->param('biblio1');
my $frombiblio = $input->param('biblio2');
+
+ # Rewriting the leader
+ $record->leader(GetMarcBiblio($tobiblio)->leader());
+
my $frameworkcode = &GetFrameworkCode($tobiblio);
my @notmoveditems;
--
1.6.3.3
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches
