From: Mike Taylor Date: Mon, 12 Apr 2010 12:57:47 +0000 (+0100) Subject: _really_rewrite_record() renamed more explicitly to _rewrite_zeerex_record() X-Git-Tag: CPAN-v1.02~165 X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=c77667147ee2fce26a177dd4fcde8f92520b0e02 _really_rewrite_record() renamed more explicitly to _rewrite_zeerex_record() --- diff --git a/lib/ZOOM/IRSpy.pm b/lib/ZOOM/IRSpy.pm index f8150b1..d330113 100644 --- a/lib/ZOOM/IRSpy.pm +++ b/lib/ZOOM/IRSpy.pm @@ -300,12 +300,12 @@ sub _rewrite_irspy_record { # connection as idle. So re-establish it if necessary. $this->{conn}->connect($conn->option("host")); - _really_rewrite_record($this->{conn}, $rec); + _rewrite_zeerex_record($this->{conn}, $rec); $conn->log("irspy", "rewrote XML record"); } -sub _really_rewrite_record { +sub _rewrite_zeerex_record { my($conn, $rec, $oldid) = @_; my $p = $conn->package();