Beginning tagging of Luke

This commit is contained in:
Henry Whitney 2020-09-21 17:46:19 -04:00
parent ba06339b81
commit abf7c2cfe9
3 changed files with 26539 additions and 3 deletions

View File

@ -116,8 +116,8 @@ say "\nDone.";
__DATA__
#41-MAT Matthew
#42-MRK Mark
#43-LUK Luke
44-JHN John
43-LUK Luke
#44-JHN John
#45-ACT Acts
#46-ROM Romans
#47-1CO 1 Corinthians

View File

@ -28,7 +28,7 @@ my (%ULBtextThisVerse, %ULBpreTextThisVerse, %SNsThisVerse, %entriesThisSN, %lon
my @OGNTfilesToRun = ();
#my $filePattern = '\.xml' ;
my $filePattern = '44-JHN\.xml' ;
my $filePattern = '43-LUK\.xml' ;
find( sub { push @OGNTfilesToRun, $File::Find::name if ( m/^(.*)$filePattern$/ ) }, $topDirOGNT) ;
say LOG "\@OGNTfilesToRun:\n@OGNTfilesToRun\n";

26536
Manual_Tagging/43-LUK.xml Normal file

File diff suppressed because it is too large Load Diff