Author: stas Date: Mon Dec 6 11:56:14 2004 New Revision: 110012 URL: http://svn.apache.org/viewcvs?view=rev&rev=110012 Log: swap the t_cmp args order (expected comes second now)
Modified: httpd/apreq/branches/1.x/t/apreq/big_input.t httpd/apreq/branches/1.x/t/apreq/cookie.t httpd/apreq/branches/1.x/t/apreq/inherit.t httpd/apreq/branches/1.x/t/apreq/request.t Modified: httpd/apreq/branches/1.x/t/apreq/big_input.t Url: http://svn.apache.org/viewcvs/httpd/apreq/branches/1.x/t/apreq/big_input.t?view=diff&rev=110012&p1=httpd/apreq/branches/1.x/t/apreq/big_input.t&r1=110011&p2=httpd/apreq/branches/1.x/t/apreq/big_input.t&r2=110012 ============================================================================== --- httpd/apreq/branches/1.x/t/apreq/big_input.t (original) +++ httpd/apreq/branches/1.x/t/apreq/big_input.t Mon Dec 6 11:56:14 2004 @@ -3,7 +3,7 @@ # test the processing of variations of the key lengths and the keys # numbers - + use Apache::Test; use Apache::TestUtil; use Apache::TestRequest qw(GET_BODY POST_BODY); @@ -37,8 +37,8 @@ my $body = GET_BODY "$location?$query"; t_debug "# of keys : $key_num, key_len $key_len"; - ok t_cmp(( ($key_len + 3) * $key_num - 1), - $body, + ok t_cmp($body, + ( ($key_len + 3) * $key_num - 1), "GET long query"); } @@ -60,8 +60,8 @@ my $body = POST_BODY $location, content => $query; t_debug "# of keys : $big_key_num, key_len $big_key_len"; - ok t_cmp(( ($big_key_len + 3) * $big_key_num - 1), - $body, + ok t_cmp($body, + ( ($big_key_len + 3) * $big_key_num - 1), "POST big data"); } Modified: httpd/apreq/branches/1.x/t/apreq/cookie.t Url: http://svn.apache.org/viewcvs/httpd/apreq/branches/1.x/t/apreq/cookie.t?view=diff&rev=110012&p1=httpd/apreq/branches/1.x/t/apreq/cookie.t&r1=110011&p2=httpd/apreq/branches/1.x/t/apreq/cookie.t&r2=110012 ============================================================================== --- httpd/apreq/branches/1.x/t/apreq/cookie.t (original) +++ httpd/apreq/branches/1.x/t/apreq/cookie.t Mon Dec 6 11:56:14 2004 @@ -18,8 +18,9 @@ my $key = 'apache'; my $value = 'ok'; my $cookie = qq{\$Version="1"; $key="$value"; \$Path="$location"}; - ok t_cmp(qq{"$value"}, - GET_BODY("$location?test=$test&key=$key", Cookie => $cookie), + ok t_cmp(GET_BODY("$location?test=$test&key=$key", + Cookie => $cookie), + qq{"$value"}, $test); } Modified: httpd/apreq/branches/1.x/t/apreq/inherit.t Url: http://svn.apache.org/viewcvs/httpd/apreq/branches/1.x/t/apreq/inherit.t?view=diff&rev=110012&p1=httpd/apreq/branches/1.x/t/apreq/inherit.t&r1=110011&p2=httpd/apreq/branches/1.x/t/apreq/inherit.t&r2=110012 ============================================================================== --- httpd/apreq/branches/1.x/t/apreq/inherit.t (original) +++ httpd/apreq/branches/1.x/t/apreq/inherit.t Mon Dec 6 11:56:14 2004 @@ -8,7 +8,7 @@ plan tests => 1; my $location = "/TestApReq__inherit"; -ok t_cmp(<< 'VALUE', GET_BODY($location), "inheritance"); +ok t_cmp(GET_BODY($location), << 'VALUE', "inheritance"); method => GET VALUE Modified: httpd/apreq/branches/1.x/t/apreq/request.t Url: http://svn.apache.org/viewcvs/httpd/apreq/branches/1.x/t/apreq/request.t?view=diff&rev=110012&p1=httpd/apreq/branches/1.x/t/apreq/request.t&r1=110011&p2=httpd/apreq/branches/1.x/t/apreq/request.t&r2=110012 ============================================================================== --- httpd/apreq/branches/1.x/t/apreq/request.t (original) +++ httpd/apreq/branches/1.x/t/apreq/request.t Mon Dec 6 11:56:14 2004 @@ -15,15 +15,15 @@ # basic param() test my $test = 'param'; my $value = '42.5'; - ok t_cmp($value, - GET_BODY("$location?test=$test&value=$value"), + ok t_cmp(GET_BODY("$location?test=$test&value=$value"), + $value, "basic param"); } { # upload a string as a file my $test = 'upload'; my $value = 'data upload'; - ok t_cmp($value, - UPLOAD_BODY("$location?test=$test", content => $value), + ok t_cmp(UPLOAD_BODY("$location?test=$test", content => $value), + $value, "basic upload"); }
