removed title and author normalization code
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 22 Jan 2007 19:55:22 +0000 (19:55 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 22 Jan 2007 19:55:22 +0000 (19:55 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@6802 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Utils/ModsParser.pm

index af20bef..f50b9e4 100644 (file)
@@ -426,8 +426,10 @@ sub finish_mods_batch {
        my $record = init_virtual_record();
 
        # turn the hash into a fieldmapper object
-       (my $title = $perl->{title}) =~ s/\[.*?\]//og;
-       (my $author = $perl->{author}) =~ s/\(.*?\)//og;
+       #(my $title = $perl->{title}) =~ s/\[.*?\]//og;
+       #(my $author = $perl->{author}) =~ s/\(.*?\)//og;
+       my $title = $perl->{title};
+       my $author = $perl->{author};
 
        my @series;
        for my $s (@{$perl->{series}}) {