[Koha-patches] [PATCH] [SIGNED-OFF] bug 5040 fix misspelling of distance in marc21 framework

[Ian Walls]

From: Nicole Engard <nengard at bywatersolutions.com>


Signed-off-by: Ian Walls <ian.walls at bywatersolutions.com>
---
 .../marc21/mandatory/marc21_framework_DEFAULT.sql  |    2 +-
 installer/data/mysql/updatedatabase.pl             |    7 +++++++
 2 files changed, 8 insertions(+), 1 deletions(-)

diff --git a/installer/data/mysql/en/marcflavour/marc21/mandatory/marc21_framework_DEFAULT.sql b/installer/data/mysql/en/marcflavour/marc21/mandatory/marc21_framework_DEFAULT.sql
index f1881ef..3278c2f 100644
--- a/installer/data/mysql/en/marcflavour/marc21/mandatory/marc21_framework_DEFAULT.sql
+++ b/installer/data/mysql/en/marcflavour/marc21/mandatory/marc21_framework_DEFAULT.sql
@@ -626,7 +626,7 @@ INSERT INTO `marc_subfield_structure` (`tagfield`, `tagsubfield`, `liblibrarian`
 		('034', 'm', 'Right ascension--eastern limit', 'Right ascension--eastern limit', 0, 0, '', 0, '', '', '', 0, -6, '', '', '', NULL),
 		('034', 'n', 'Right ascension--western limit', 'Right ascension--western limit', 0, 0, '', 0, '', '', '', 0, -6, '', '', '', NULL),
 		('034', 'p', 'Equinox', 'Equinox', 0, 0, '', 0, '', '', '', 0, -6, '', '', '', NULL),
-		('034', 'r', 'Distrance from earth', 'Distrance from earth', 0, 0, '', 0, '', '', '', 0, -6, '', '', '', NULL),
+		('034', 'r', 'Distance from earth', 'Distance from earth', 0, 0, '', 0, '', '', '', 0, -6, '', '', '', NULL),
 		('034', 's', 'G-ring latitude', 'G-ring latitude', 1, 0, '', 0, '', '', '', 0, -6, '', '', '', NULL),
 		('034', 't', 'G-ring longitude', 'G-ring longitude', 1, 0, '', 0, '', '', '', 0, -6, '', '', '', NULL),
 		('034', 'x', 'Beginning date', 'Beginning date', 0, 0, '', 0, '', '', '', 0, -6, '', '', '', NULL),
diff --git a/installer/data/mysql/updatedatabase.pl b/installer/data/mysql/updatedatabase.pl
index ac272ce..94d3e19 100755
--- a/installer/data/mysql/updatedatabase.pl
+++ b/installer/data/mysql/updatedatabase.pl
@@ -3915,6 +3915,13 @@ if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
     SetVersion ($DBversion);
 }
 
+$DBversion = "XXX";
+if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
+    $dbh->do("UPDATE `marc_subfield_structure` SET liblibrarian = 'Distance from earth' WHERE liblibrarian = 'Distrance from earth' AND tagfield = '034' AND tagsubfield = 'r';");
+    $dbh->do("UPDATE `marc_subfield_structure` SET libopac = 'Distance from earth' WHERE libopac = 'Distrance from earth' AND tagfield = '034' AND tagsubfield = 'r';");
+    print "Upgrade to $DBversion done (Fix misspelled 034r subfield in MARC21 Frameworks)\n";
+    SetVersion ($DBversion);
+}
 
 
 =head1 FUNCTIONS
-- 
1.5.6.5