projects
/
migration-tools.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
(parent:
2124d89
)
wrong subfield
author
Jason Etheridge
<jason@esilibrary.com>
Wed, 24 Sep 2008 12:58:23 +0000 (12:58 +0000)
committer
Jason Etheridge
<jason@esilibrary.com>
Wed, 24 Sep 2008 12:58:23 +0000 (12:58 +0000)
miker-filter_incumbents.pl
patch
|
blob
|
history
diff --git
a/miker-filter_incumbents.pl
b/miker-filter_incumbents.pl
index
d30d81d
..
3ae0ab7
100644
(file)
--- a/
miker-filter_incumbents.pl
+++ b/
miker-filter_incumbents.pl
@@
-36,7
+36,7
@@
my $count = 0;
my $icount = 0;
my $scount = 0;
while (<$M>) {
- /tag="901" ind1=" " ind2=" "><subfield code="a">(\d+)</;
+ /tag="901" ind1=" " ind2=" ">.*?<subfield code="c">(\d+)</;
if ( $id{$1} ) {
print $I $_;
$icount++;