[Koha-cvs] koha/C4 Search.pm [rel_2_2]
paul poulain
paul at koha-fr.org
Tue Jul 25 14:33:04 CEST 2006
CVSROOT: /cvsroot/koha
Module name: koha
Branch: rel_2_2
Changes by: paul poulain <tipaul> 06/07/25 12:33:04
Modified files:
C4 : Search.pm
Log message:
add - to isbn only if there is an isbn !
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Search.pm?cvsroot=koha&only_with_tag=rel_2_2&r1=1.99.2.12&r2=1.99.2.13
Patches:
Index: Search.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Search.pm,v
retrieving revision 1.99.2.12
retrieving revision 1.99.2.13
diff -u -b -r1.99.2.12 -r1.99.2.13
--- Search.pm 7 Jul 2006 20:37:28 -0000 1.99.2.12
+++ Search.pm 25 Jul 2006 12:33:04 -0000 1.99.2.13
@@ -30,7 +30,7 @@
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
# set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.99.2.12 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.99.2.13 $' =~ /\d+/g;
shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
=head1 NAME
@@ -1541,7 +1541,7 @@
chop $data->{'additionalauthors'};
chop $data->{'additionalauthors'};
# handle ISBN : reintroduce - if there are none
- $data->{'isbn'} = DisplayISBN($data->{'isbn'});
+ $data->{'isbn'} = DisplayISBN($data->{'isbn'}) if $data->{isbn};
$sth->finish;
return($data);
} # sub bibdata
More information about the Koha-cvs
mailing list