[Koha-cvs] CVS: koha/C4 Koha.pm,1.9,1.10

[Andrew Arensburger]

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

Modified Files:
        Koha.pm 
Log Message:
Removed trailing whitespace that was messing up the POD.


Index: Koha.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Koha.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -r1.9 -r1.10
*** Koha.pm     10 Oct 2002 04:36:09 -0000      1.9
--- Koha.pm     11 Oct 2002 12:39:34 -0000      1.10
***************
*** 1,5 ****
  package C4::Koha;
  
- 
  # Copyright 2000-2002 Katipo Communications
  #
--- 1,4 ----
***************
*** 24,30 ****
  
  use vars qw($VERSION @ISA @EXPORT);
!   
  $VERSION = 0.01;
!     
  =head1 NAME
  
--- 23,29 ----
  
  use vars qw($VERSION @ISA @EXPORT);
! 
  $VERSION = 0.01;
! 
  =head1 NAME
  
***************
*** 56,63 ****
             &borrowercategories
             &ethnicitycategories
!            $DEBUG); 
  
  use vars qw();
!       
  my $DEBUG = 0;
  
--- 55,62 ----
             &borrowercategories
             &ethnicitycategories
!            $DEBUG);
  
  use vars qw();
! 
  my $DEBUG = 0;
  
***************
*** 72,76 ****
  
  sub slashifyDate {
!     # accepts a date of the form xx-xx-xx[xx] and returns it in the 
      # form xx/xx/xx[xx]
      my @dateOut = split('-', shift);
--- 71,75 ----
  
  sub slashifyDate {
!     # accepts a date of the form xx-xx-xx[xx] and returns it in the
      # form xx/xx/xx[xx]
      my @dateOut = split('-', shift);
***************
*** 89,93 ****
  #'
  
! sub fixEthnicity($) { 
  
      my $ethnicity = shift;
--- 88,92 ----
  #'
  
! sub fixEthnicity($) {
  
      my $ethnicity = shift;