Changeset 18200
- Timestamp:
- 2008-12-15T10:57:28+13:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/marcmapping.pm
r16692 r18200 82 82 } 83 83 } 84 elsif ($line =~ m/^(.*?)->\s*([\w\ ^]+)$/)84 elsif ($line =~ m/^(.*?)->\s*([\w\.\^]+)$/) 85 85 { 86 86 my $lhs = $1;
Note:
See TracChangeset
for help on using the changeset viewer.