--- trunk/tools/mods2unimarc.pl	2004/05/15 19:52:01	328
+++ trunk/tools/mods2unimarc.pl	2004/05/15 20:54:40	329
@@ -231,7 +231,7 @@
 			if ($t =~ m/([^:]+):\s+(.+)$/) {
 				$tmp->{$1} = $2;
 			} else {
-				die "can't parse $t";
+				print STDERR "can't parse '$t' in ",Dumper($phy_desc);
 			}
 		}
 		my $data = $tmp->{pagin};
@@ -274,6 +274,8 @@
 
 	marc_add_single($m_cache,'205','a',$ref->{originInfo}->{edition});
 
+	marc_add($m_cache,'210','a',$ref->{originInfo}->{place});
+
 	my $publisher = $ref->{originInfo}->{publisher};
 	if ($publisher =~ m,^(.+?)\s*/\s*(.+)$,) {
 		marc_add($m_cache,'210','a', $2);
@@ -282,7 +284,6 @@
 		marc_add($m_cache,'210','c', $publisher);
 	}
 
-	marc_add($m_cache,'210','a',$ref->{originInfo}->{place});
 	marc_add($m_cache,'210','d',$ref->{originInfo}->{dateIssued});
 
 	marc_single($m_cache,'210');