corrections

git-svn-id: https://www.crosswire.org/svn/sword-tools/trunk@269 07627401-56e2-0310-80f4-f8cd0041bdcd

1 files changed, 3 insertions, 3 deletions

diff --git a/modules/geneve/wb.pl b/modules/geneve/wb.pl
index e16dc5d..2b28e7d 100755
--- a/modules/geneve/wb.pl
+++ b/modules/geneve/wb.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-sub vs2osisref {
+sub vs2osis {
        
         my $context = $_[0];
         $context =~ s/([12345]?[A-Z][a-z]+)\ .*/$1/;
@@ -19,7 +19,7 @@ sub vs2osisref {
 
 
 
-my @files=`ls -1 *.abw`;
+my @files=`ls -1 wb.abw`;
 
 foreach (@files){ 
 
@@ -43,7 +43,7 @@ foreach (@files){
                 s/<c\ style=\"Kursiv ZF\"\ >(.*?)<\/c>/<hi rend=\"italic\">$1<\/hi>/g;
 
                 # references
-                s/(([12345]?[A-Z][a-z]+)(;?\ [0-9]+(,[0-9]+(\-[0-9]+)?)?)+)(\ |\)|;)/ &vs2osisref("$1").$^N/eg;
+                s/(([12345]?[A-Z][a-z]+)(;?\ [0-9]+(,[0-9]+(\-[0-9]+)?)?)+)(\ |\)|;)/ &vs2osis("$1").$^N/eg;
                 
  #               s/<r>(.*?)<\/r>/&vs2osisref($1)/eg;