--- trunk/Estraier.pm	2006/01/06 20:58:26	57
+++ trunk/Estraier.pm	2006/01/06 21:05:05	58
@@ -1552,7 +1552,8 @@
 
 	return if ($rv != 200 || !$resbody);
 
-	chomp($resbody);
+	# it seems that response can have multiple line endings
+	$resbody =~ s/[\r\n]+$//;
 
 	( $self->{name}, $self->{label}, $self->{dnum}, $self->{wnum}, $self->{size} ) =
 		split(/\t/, $resbody, 5);