[Koha-devel] CVS: koha detail.pl,1.1.1.1,1.2

[Chris Cornack]

Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv539

Modified Files:
        detail.pl 
Log Message:
Little fix so that if the item has no author information, empty () dont disply


Index: detail.pl
===================================================================
RCS file: /cvsroot/koha/koha/detail.pl,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -r1.1.1.1 -r1.2
*** detail.pl   2000/12/19 23:45:51     1.1.1.1
--- detail.pl   2001/02/11 22:44:34     1.2
***************
*** 47,51 ****
  }  
  my @temp=split('\t',$items[0]);
! print mkheadr(3,"$dat->{'title'} ($dat->{'author'}) $temp[4]");
  print <<printend
  
--- 47,55 ----
  }  
  my @temp=split('\t',$items[0]);
! if ($dat->{'author'} ne ''){
!   print mkheadr(3,"$dat->{'title'} ($dat->{'author'}) $temp[4]");
! } else {
!   print mkheadr(3,"$dat->{'title'} $temp[4]");
! }
  print <<printend