change left-over $rec to $row

diff --git a/public/code/Cited Author.cleanup.pl b/public/code/Cited Author.cleanup.pl
index f709afa..9f95c16 100644 (file)
--- a/public/code/Cited Author.cleanup.pl
+++ b/public/code/Cited Author.cleanup.pl
@@ -1,4 +1,4 @@
 map {
        s/^\.+//;
        $_ = uc $_;
-} @{ $rec->{'Cited Author'} };
+} @{ $row->{'Cited Author'} };