[Koha-cvs] CVS: koha/C4 Search.pm,1.85.2.2,1.85.2.3

[Paul POULAIN]

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17044/C4

Modified Files:
      Tag: rel_2_0
	Search.pm 
Log Message:
code indenting only ?

Index: Search.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Search.pm,v
retrieving revision 1.85.2.2
retrieving revision 1.85.2.3
diff -C2 -r1.85.2.2 -r1.85.2.3
*** Search.pm	13 Jan 2004 17:31:37 -0000	1.85.2.2
--- Search.pm	26 Jan 2004 10:39:16 -0000	1.85.2.3
***************
*** 1350,1358 ****
      }
  
!     my $class = $data->{'classification'};
      my $dewey = $data->{'dewey'};
      $dewey =~ s/0+$//;
!     if ($dewey eq "000.") { $dewey = "";};	# FIXME - "000" is general
! 						# books about computer science
      if ($dewey < 10){$dewey='00'.$dewey;}
      if ($dewey < 100 && $dewey > 10){$dewey='0'.$dewey;}
--- 1350,1357 ----
      }
  
!     my $class = $data->{'classification'};# FIXME : $class is useless
      my $dewey = $data->{'dewey'};
      $dewey =~ s/0+$//;
!     if ($dewey eq "000.") { $dewey = "";};	# FIXME - "000" is general books about computer science
      if ($dewey < 10){$dewey='00'.$dewey;}
      if ($dewey < 100 && $dewey > 10){$dewey='0'.$dewey;}