--- foxridge-archiver/makemeta-vlp.pl	2006/12/11 18:08:24	1.6
+++ foxridge-archiver/makemeta-vlp.pl	2009/02/02 11:45:15	1.8
@@ -10,7 +10,7 @@ use MPIWGStor;
 $|=1;
 
 # program version
-my $version = "0.2.4 (5.12.2006 ROC)";
+my $version = "0.2.6 (1.2.2009 ROC)";
 my $help = 
 "use: makemeta-vlp [options] file.xml
 options:
@@ -29,7 +29,7 @@ logger("INFO", "makemeta-vlp $version");
 # generic mappings at top level
 my %gen_map = (
     'Custom2_Language' => 'meta/lang',
-    'ProductionComment' => 'meta/image-acquisition/production-comment',
+    'productionComment' => 'meta/image-acquisition/production-comment',
     'derivedFrom' => 'derived-from/archive-path'
     );
 # sub type switch tag
@@ -183,7 +183,10 @@ my %lang_map = (
     'Japanese' => 'ja',
     'Dutch' => 'nl',
     'Spanish' => 'es',
-    'Swedish' => 'sv'
+    'Swedish' => 'sv',
+    'Russian' => 'ru',
+    'Polish' => 'pl',
+    'Greek' => 'el'
     );
 # storage fields
 my $arch_id_field = 'ID';