[Koha-cvs] CVS: koha/C4 Koha.pm,1.9,1.10
Andrew Arensburger
arensb at users.sourceforge.net
Fri Oct 11 14:39:37 CEST 2002
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
ðnicitycategories
! $DEBUG);
use vars qw();
!
my $DEBUG = 0;
--- 55,62 ----
&borrowercategories
ðnicitycategories
! $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;
More information about the Koha-cvs
mailing list