Mailing-List: contact apreq-cvs-help@httpd.apache.org; run by ezmlm
Precedence: bulk
Reply-To: apreq-dev@httpd.apache.org
Date: 11 Jul 2004 01:26:55 -0000
Message-ID: <20040711012655.17291.qmail@minotaur.apache.org>
From: randyk@apache.org
To: httpd-apreq-2-cvs@apache.org
Subject: cvs commit: httpd-apreq-2/glue/perl/t/apreq request.t

randyk      2004/07/10 18:26:55

  Modified:    glue/perl/t/apreq request.t
  Log:
  Reviewed by:	joes
  Upload content without the \r, as Win32 inserts an extra one at the end.
  
  Revision  Changes    Path
  1.17      +1 -1      httpd-apreq-2/glue/perl/t/apreq/request.t
  
  Index: request.t
  ===================================================================
  RCS file: /home/cvs/httpd-apreq-2/glue/perl/t/apreq/request.t,v
  retrieving revision 1.16
  retrieving revision 1.17
  diff -u -r1.16 -r1.17
  --- request.t	7 Jul 2004 23:53:01 -0000	1.16
  +++ request.t	11 Jul 2004 01:26:55 -0000	1.17
  @@ -22,7 +22,7 @@
   
   for my $test (qw/slurp bb tempname link fh io bad;query=string%%/) {
       # upload a string as a file
  -    my $value = ('DataUpload' x 10 . "\r\n") x 1_000;
  +    my $value = ('DataUpload' x 10 . "\n") x 1_000;
       my $result = UPLOAD_BODY("$location?test=$test", content => $value); 
       ok t_cmp($value, $result, "basic upload");
       my $i;