From: Don Armstrong Date: Fri, 2 Dec 2016 16:59:26 +0000 (-0800) Subject: handle journal names with odd characters X-Git-Url: https://git.donarmstrong.com/?p=reference.git;a=commitdiff_plain;h=4b9acffba9e05282bd511cf7cc31ee34559d4bd0;hp=6f76a72abf717b3e1fa3ea4027169734b1ebbad7 handle journal names with odd characters --- diff --git a/lib/Reference/Field/Journal.pm b/lib/Reference/Field/Journal.pm index ad5639a..eb27680 100644 --- a/lib/Reference/Field/Journal.pm +++ b/lib/Reference/Field/Journal.pm @@ -84,7 +84,7 @@ sub journal{ local $_ = $params{output}; if (/bibtex/) { my $title = $self->{reference}->{journal}->{medlineabbr} || $self->{reference}->{journal}->{title}; - $title =~ s/\s//g; + $title =~ s/[^A-Za-z0-9]//g; return $title; } elsif (/medline/) { return $self->{reference}->{journal}->{medlineabbr} || $self->{reference}->{journal}->{title};