Tagging ULB
This commit is contained in:
parent
df00e2173b
commit
314d37071c
|
@ -103,7 +103,7 @@ __DATA__
|
||||||
#48-2CO 2 Corinthians
|
#48-2CO 2 Corinthians
|
||||||
#49-GAL Galatians
|
#49-GAL Galatians
|
||||||
#50-EPH Ephesians
|
#50-EPH Ephesians
|
||||||
#51-PHP Philippians
|
51-PHP Philippians
|
||||||
52-COL Colossians
|
52-COL Colossians
|
||||||
#53-1TH 1 Thessalonians
|
#53-1TH 1 Thessalonians
|
||||||
#54-2TH 2 Thessalonians
|
#54-2TH 2 Thessalonians
|
||||||
|
|
|
@ -26,7 +26,7 @@ my (%ULBtextThisVerse, %ULBpreTextThisVerse, %SNsThisVerse, %entriesThisSN, %lon
|
||||||
|
|
||||||
my @OGNTfilesToRun = ();
|
my @OGNTfilesToRun = ();
|
||||||
#my $filePattern = '\.xml' ;
|
#my $filePattern = '\.xml' ;
|
||||||
my $filePattern = '52-COL\.xml' ;
|
my $filePattern = '51-PHP\.xml' ;
|
||||||
find( sub { push @OGNTfilesToRun, $File::Find::name if ( m/^(.*)$filePattern$/ ) }, $topDirOGNT) ;
|
find( sub { push @OGNTfilesToRun, $File::Find::name if ( m/^(.*)$filePattern$/ ) }, $topDirOGNT) ;
|
||||||
|
|
||||||
say LOG "\@OGNTfilesToRun:\n@OGNTfilesToRun\n";
|
say LOG "\@OGNTfilesToRun:\n@OGNTfilesToRun\n";
|
||||||
|
|
File diff suppressed because it is too large
Load Diff
|
@ -1,3 +1,6 @@
|
||||||
/63-1JN.usfm
|
/63-1JN.usfm
|
||||||
/63-1JN.usfm.xml
|
/63-1JN.usfm.xml
|
||||||
/ULB.xml
|
/ULB.xml
|
||||||
|
/Standard.txt
|
||||||
|
/Tagged.txt
|
||||||
|
/map.tab
|
||||||
|
|
Loading…
Reference in New Issue