X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=blobdiff_plain;f=Equinox-Migration%2Flib%2FEquinox%2FMigration%2FSubfieldMapper.pm;h=359112263f9bcc51f5b2d2d19e0917f9a35db094;hp=8716b18635c89cf6a9b2b938f0991d96438438c0;hb=91d24a301f22bb36553e6f2a928745687bb4be90;hpb=bb822592362a1681654bd04bc7ed3112be315b5d

diff --git a/Equinox-Migration/lib/Equinox/Migration/SubfieldMapper.pm b/Equinox-Migration/lib/Equinox/Migration/SubfieldMapper.pm
index 8716b18..3591122 100644
--- a/Equinox-Migration/lib/Equinox/Migration/SubfieldMapper.pm
+++ b/Equinox-Migration/lib/Equinox/Migration/SubfieldMapper.pm
@@ -256,7 +256,7 @@ sub generate {
               { push @{$map->{mods}}, $tok }
             elsif ($tok =~ m/^f:/)
               { push @{$map->{filt}}, $tok }
-            elsif ($tok =~ m/^[a-z0-9]$/)
+            elsif ($tok =~ m/^[a-zA-Z0-9]$/)
               { $map->{sub} = $tok }
             elsif ($tok =~ /^c:(.*)$/)
               { $map->{sep} = $1 }