--- foxridge-archiver/makemeta-lib.pl	2005/05/26 14:31:28	1.1
+++ foxridge-archiver/makemeta-lib.pl	2005/06/01 12:24:19	1.2
@@ -9,17 +9,13 @@ use MPIWGStor;
 # make output unbuffered
 $|=1;
 
-#######################################################
-# internal parameters
-#
-
 # program version
-my $version = "0.1.0 (24.5.2005)";
+my $version = "0.1.1 (1.6.2005)";
 logger("INFO", "makemeta-lib $version");
 
-#
+###########################################
 # mappings
-#
+
 # generic mappings at top level
 my %gen_map = (
     'Device' => 'meta/image-acquisition/device',
@@ -96,17 +92,21 @@ my %lang_map = (
     'English' => 'en',
     'Italian' => 'it',
     'French' => 'fr',
-    'Latin' => 'la'
+    'Latin' => 'la',
+    'Spanish' => 'es'
     );
 # storage fields
 my $arch_id_field = 'ID_Archive';
 my $online_url_field = 'URL';
 
-# more storage
+#######################################################
+# internal parameters
+#
+
+# storage
 my $lib_arch_dir = '/mpiwg/archive/data/library';
 my $lib_online_dir = '/mpiwg/online/permanent';
 
-
 # read command line parameters
 my $args = MPIWGStor::parseargs;