[Koha-cvs] koha/reports inventory.pl [rel_2_2]

[Chris Cormack]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_2_2
Changes by:	Chris Cormack <rangi>	07/05/03 00:57:16

Modified files:
	reports        : inventory.pl 

Log message:
	Fix for catching windows linefeeds

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/reports/inventory.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.4.4&r2=1.1.4.5

Patches:
Index: inventory.pl
===================================================================
RCS file: /sources/koha/koha/reports/inventory.pl,v
retrieving revision 1.1.4.4
retrieving revision 1.1.4.5
diff -u -b -r1.1.4.4 -r1.1.4.5
--- inventory.pl	5 Feb 2006 21:59:21 -0000	1.1.4.4
+++ inventory.pl	3 May 2007 00:57:16 -0000	1.1.4.5
@@ -81,8 +81,9 @@
 	my @errorloop;
 	my $count=0;
 	while (my $barcode=<$uploadbarcodes>){
+	    $barcode =~ s/\r//g; # clear out windows line feeds, otherwise things go badly if ppl upload a file made on windows
 		chomp $barcode;
-# 		warn "$barcode";
+
 		if ($qwthdrawn->execute($barcode) &&$qwthdrawn->rows){
 			push @errorloop, {'barcode'=>$barcode,'ERR_WTHDRAWN'=>1};
 		}else{