--- trunk/IsisDB.pm	2004/12/30 23:16:20	19
+++ trunk/IsisDB.pm	2004/12/31 04:21:21	23
@@ -520,7 +520,7 @@
 			my $val;
 
 			# has identifiers?
-			($val->{'i1'},$val->{'i2'}) = ($1,$2) if ($l =~ s/^([01 #])([01 #])//);
+			($val->{'i1'},$val->{'i2'}) = ($1,$2) if ($l =~ s/^([01 #])([01 #])\^/\^/);
 
 			# has subfields?
 			if ($l =~ m/\^/) {