From: Ben Ostrowsky Date: Fri, 6 Nov 2009 16:51:51 +0000 (+0000) Subject: Minor fix to a comment line X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=commitdiff_plain;h=6d6e50c1fc61268dc4b31f5de26e9b0fea725a0e Minor fix to a comment line git-svn-id: svn://nox.esilibrary.com/migration-tools@637 eee7cc8d-164e-4af6-8e1b-092a69004917 --- diff --git a/unicorn/unicorn_patrons_to_tsv.pl b/unicorn/unicorn_patrons_to_tsv.pl index 047ba97..3f3d5e7 100755 --- a/unicorn/unicorn_patrons_to_tsv.pl +++ b/unicorn/unicorn_patrons_to_tsv.pl @@ -61,7 +61,7 @@ while (<>) { next; } - # Is this line the beginning of a block of data (typically an address or a note)? + # Is this line the end of a block of data (typically an address or a note)? if ( /^\.(.*?)_END.$/ ) { if ("$1." ne $section) { print STDERR "Error in record $serial, line $line (input line $.): got an end-of-$1 but I thought I was in a $section block!\n";