From: Mike Taylor <mike@miketaylor.org.uk>
Date: Mon, 12 Apr 2010 13:44:13 +0000 (+0100)
Subject: Use new name _rewrite_zeerex_record() for old _really_rewrite_record()
X-Git-Tag: CPAN-v1.02~161
X-Git-Url: http://lists.indexdata.dk/?a=commitdiff_plain;h=b7dc5228a01abb3117bb654e108c9dd8f1b48f78;p=irspy-moved-to-github.git

Use new name _rewrite_zeerex_record() for old _really_rewrite_record()
---

diff --git a/bin/test-xml-update.pl b/bin/test-xml-update.pl
index 8cc551c..ad7f086 100755
--- a/bin/test-xml-update.pl
+++ b/bin/test-xml-update.pl
@@ -10,7 +10,7 @@ use warnings;
 use Getopt::Std;
 use ZOOM;
 use ZOOM::IRSpy::Utils qw(irspy_xpath_context modify_xml_document);
-use ZOOM::IRSpy;		# For _really_rewrite_record()
+use ZOOM::IRSpy;		# For _rewrite_zeerex_record()
 
 # This array copied from ../web/htdocs/details/edit.mc
 my @fields =
@@ -80,7 +80,7 @@ print("Document modified with $nchanges change", $nchanges == 1 ? "" : "s",
       ": ", join(", ", map { $_->[2] } @changedFields), "\n");
 
 if ($opts{w}) {
-    ZOOM::IRSpy::_really_rewrite_record($conn, $xc->getContextNode(), $id);
+    ZOOM::IRSpy::_rewrite_zeerex_record($conn, $xc->getContextNode(), $id);
     print "Rewrote record '$id'\n";
 }